unford [mailto:[EMAIL PROTECTED]]
> Sent: Monday, 13 November 2000 10:31 a.m.
> To: Multiple recipients of list delphi
> Subject: RE: [DUG]: Encrypting a Password in OnSetText, and OnGetText.
>
>
>
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of Stacey Verner
Sent: Monday, 13 November 2000 09:15
To: Multiple recipients of list delphi
Subject: [DUG]: Encrypting a Password in OnSetText, and OnGetText.
I have a database field, that contains an encryp
I
don't think the Text parameter is initialised with the value of the field.
Try something like this:
procedure
TfEMailOptions.DecryptPassword(Sender: TField;
var Text: String; DisplayText:
Boolean);
begin
inherited;
Text := DecryptString(Sender.AsString);
end;
Hope
that help
