Hi Group;

I am using a modified version of InitializeConnection
from Basic Tutorials.

procedure TFrmMain.InitializeConnection;
begin
with dmConnection.IBC_Main do
begin
Connected := False;
DatabaseName := (DBPath + DBName);
LoginDBReadOnly := True;
LoginPrompt := True;
Server := MchName;
Path := (DBPath + DBName);
Protocol := cpTCP_IP;
end; { with dmConnection.IBC_Main do}

with dmConnection.IBC_Archive do
begin
Connected := False;
DatabaseName := (DBPath + DBName2);
LoginDBReadOnly := True;
LoginPrompt := False;
with Params do
begin
Values['USER NAME'] :=
dmConnection.ibc_main.LoginUsername;
Values['PASSWORD'] :=
dmConnection.ibc_main.?
end; { with Params do}
Server := MchName;
Path := (DBPath + DBName2);
Protocol := cpTCP_IP;
end; { with dmConnection.IBC_Archive do}


I want the user to log into the first database
(dmConnection.IBC_Main) but I would like to use the
values from the login to get to the second database
(dmConnection.IBC_Archive). I have found the property
LoginUsername but where is the equivlant for PASSWORD.
Or is there an easier way to do this. I am using
Delphi 4.0 Professional with service pack 3 and IB
Objects 3.6 Dj. Any help is appreciated.

Thanks in advance,
David C. Husarik


__________________________________________________
Do You Yahoo!?
Yahoo! Health - your guide to health and wellness
http://health.yahoo.com