Главная страница | назад





Article #15050: Logging in to the remote datamodule

 Question and Answer Database
FAQ50D.txt Logging in to the remote datamodule
Category :DCOM/MultiTier/ActiveForm
Platform :All
Product :Delphi 3.x
Question:
How is the UserName and Password passed to the remote
datamodule?
Answer:
On the RemoteDataModule, drop a TDatabase and add an
automation procedure (use Edit | Add To Interface) for
login. Make sure that the HandleShared property is True
on the TDatabase.
procedure Login(UserName, Password: WideString);
begin
{ DB = TDatabase }
{ Something unique between clients }
DB.DatabaseName := UserName + 'DB';
DB.Params.Values['USER NAME'] := UserName;
DB.Params.Values['PASSWORD'] := Password;
DB.Open;
end;
After you have created the automation method on the
RemoteDataModule (using Edit | Add To Interface), you can
call that method using;
RemoteServer1.AppServer.Login('USERNAME','PASSWORD');
7/16/98 4:31:28 PM

Last Modified: 01-SEP-99