Source position: o32flxed.pas line 63
type TFEUserValidationEvent = procedure(
Sender: TObject;
var ValidEntry: Boolean
) of object;