Source position: ovcef.pas line 52
type TValidationErrorEvent = procedure(
Sender: TObject;
ErrorCode: Word;
ErrorMsg: string
) of object;