Source position: ovcef.pas line 49
type TUserValidationEvent = procedure(
Sender: TObject;
var ErrorCode: Word
) of object;