TPRegState = ^TRegState;
TRegState = record
TrialDays: Integer;
Key, License: string;
Registered: Boolean;
end;
//Global var:
Rstate: TPRegstate;
//In formshow:
Rstate.Key := ''; //AVErr here
RegStatus(Rstate);
_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi
