Source position: ovcbase.pas line 132
type TPreEditEvent = procedure(
Sender: TObject;
LosingControl: TWinControl
) of object;