Про TIBdatabase...

← →
alexdbases © (2002-06-16 13:05) [0]

Как переопределить логин для входа в БД...для IBDataBase.....стандартно чёто не пашет....нелп

← →
kaif © (2002-06-16 17:39) [1]

ничего не понятно...
Можно как-то иначе изъяснить суть проблемы?

procedure TRKI_DM.dbRKILogin(Database: TIBDatabase; LoginParams: TStrings);
begin
GetLoginParams(LoginParams);
end;

функция определена так
function GetLoginParams(ALoginParams: TStrings): Boolean;
var
LoginForm: TLoginForm;
begin
Result := False;
LoginForm := TLoginForm.Create(Application);
try
if LoginForm.ShowModal = mrOk then
begin
ALoginParams.Values["USER_NAME"] := LoginForm.edtName.Text;
ALoginParams.Values["PASSWORD"] := LoginForm.edtPassword.Text;
Result := True;
end;
finally
LoginForm.Free;
end;
end;
....Вот так вот не работает.а должна

Про TIBdatabase... Найти похожие ветки