Source position: ucbase.pas line 307
type TOnLogoff = procedure(
Sender: TObject;
IdUser: Integer
) of object;