[Mrak]

Здравствуйте!
нужно, чтоб в мускл добавлялась запись об имени юзера, который заносил данные.
при входе в прогу он вбивает логин и пароль и они формируется в connectionstring.
как мне обратиться к ней и вытащить логин?

[Yurk@]

а просто сохранить логин сразу после нажатия ОК и успешной проверки валидности, не ?

[Mrak]

Сообщение от Yurk@

а просто сохранить логин сразу после нажатия ОК и успешной проверки валидности, не ?

как? синтаксис?

[M.A.D.M.A.N.]

В АДОКоннекшн есть поле ConnectionString, вот в ней логин.

[Mrak]

Сообщение от M.A.D.M.A.N.

В АДОКоннекшн есть поле ConnectionString, вот в ней логин.

уважаемый, в топе я тоже самое написал.
знаю, что он там есть.
как обратиться к этой строке?
скажем,
ADOTable_zvonok.FieldByName('USER').Asstring := edit1.Text;
что мне поставить вместо edit1.Text???

[M.A.D.M.A.N.]

Ну так бы и спрашивал, что запрос надо.

Код:

SELECT	USER();

И вставлять на уровне базы, а не клиента.

З.Ы. Читаем справку.

[Mrak]

Сообщение от M.A.D.M.A.N.

Ну так бы и спрашивал, что запрос надо.

Код:

SELECT	USER();

И вставлять на уровне базы, а не клиента.

З.Ы. Читаем справку.

это sql запрос
мне надо, чтоб и в клиенте на какую-нибудь лэйблу писалось)
имхо, собака в connectionstring зарыта...
как же это бы, а?

[Mrak]

Код:

  st:=adoconnection1.ConnectionString;
  n:=Pos('User', st)+8; 
  login:='';
  for i:=n to Length(st) do
  begin
    if st[i]=';' then break;
    login:=login+st[i];
  end;
  form1.Caption:='Логин: '+login;

сделал так... топорно, ну а че делать?

[M.A.D.M.A.N.]

А так нельзя?

Код:

ADOQuery.Query('SELECT	USER();')
caption := ADOQuery.FieldByname['USER'].AsString

[Mrak]

Сообщение от M.A.D.M.A.N.

А так нельзя?

Код:

ADOQuery.Query('SELECT	USER();')
caption := ADOQuery.FieldByname['USER'].AsString

а фиг знает) может и можно))
квери надо добавлять, неохота уже

[M.A.D.M.A.N.]

Одного квери достаточно для всей программы (по крайней мере мне одного квери вполне хватает).