Source position: ovcedcal.pas line 52
type TOvcPreParseDateEvent = procedure(
Sender: TObject;
var Value: string
) of object;