Такая проблемма
на событие TIBDatabase.AfterConnect мне надо вытянуть в параметры логин и пароль пользователя под которым я зашел в базу ... и передать этот логин и пароль во вторую TIBDatabase

получается код такого типа...

procedure TfrmMain.dbDataAfterConnect(Sender: TObject);
var a, b, s: string;
begin
s := 'C:\Program Files\Firebird\security.fdb';
a := dbData.Params.Values['user_name'];
b := dbData.Params.Values['password'];
dbSecure.Params.Values['user_name'] := a;
dbSecure.Params.Values['password'] := b;
dbSecure.DatabaseName := s;
dbSecure.Connected := true;
end;

Суть проблеммы: логин выбирается, пароль ни в какую
Как мне вытянуть оттуда(из Params) пароль, учитывая то что они у меня затрагиваются только LoginPrompt-ом при логине и когда я пытаюсь вытянуть оттуда данные.