Board index » delphi » DCom connection Login

DCom connection Login

According to the Delphi 6 (enterprise) documentation i should be able to do
a remote login like this.

procedure TDM.DCOMConnection1Login(Sender: TObject; Username,
  Password: String);
var
  EncryptedValues: OleVariant;
begin
  EncryptedValues := EncryptThem(UserName, Password);
  if not DCOMConnection1.AppServer.AS_Login(EncryptedValues) then
    raise ELoginFailed.Create('Login rejected');
end;

The compiler does not know about EncryptThem and ELoginFailed.
Does anyone know in which DCU:s these are implemented??

Thanx!

 

Re:DCom connection Login


EncryptThem is not an existing function. In documentation, "EncryptThem"
means that you have to create your own encryption routine.

"Mats Andersson" <d...@df.jk> a crit dans le message de news:
DrHk7.104$fp3.7...@read2.inet.fi...

Quote
> According to the Delphi 6 (enterprise) documentation i should be able to
do
> a remote login like this.

> procedure TDM.DCOMConnection1Login(Sender: TObject; Username,
>   Password: String);
> var
>   EncryptedValues: OleVariant;
> begin
>   EncryptedValues := EncryptThem(UserName, Password);
>   if not DCOMConnection1.AppServer.AS_Login(EncryptedValues) then
>     raise ELoginFailed.Create('Login rejected');
> end;

> The compiler does not know about EncryptThem and ELoginFailed.
> Does anyone know in which DCU:s these are implemented??

> Thanx!

Other Threads