Source position: msedataedits.pas line 47
type checkvalueeventty = procedure(
const sender: tcustomdataedit;
const quiet: Boolean;
var accept: Boolean
) of object;