![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TDatabase [D5, Win95/98]
jessis © (2002-08-15 17:07:00)Как достать из Database, значения только что введеных логина и пароля?
Ученик (2002-08-15 17:26:00) [1]Попробуй так
uses
BDE, DBLogDlg;
procedure TForm1.Database1Login(Database: TDatabase;
LoginParams: TStrings);
var
UserName, Password : string;
begin
UserName := LoginParams.Values[szUSERNAME];
Password := LoginParams.Values[szPASSWORD];
if LoginDialog(Database.DatabaseName, UserName, Password) then begin
LoginParams.Values[szUSERNAME] := UserName;
LoginParams.Values[szPASSWORD] := Password;
Database2.LoginPrompt := False;
Database2.Params.Values[szUSERNAME] := UserName;
Database2.Params.Values[szPASSWORD] := Password
end
end;
jessis (2002-08-15 17:20:00) [2]прога работает с друмя БД. Надо сделать так, чтобы пользователь не вводил дважды пароль и логин
Ученик (2002-08-15 17:17:00) [3]Пароль вроде нельзя, необходимо использовать событие TDatabase.OnLogin