Source position: msedialog.pas line 183
type integerdialogexeceventty = procedure(
const sender: tcustomdataedit;
var avalue: Integer;
var modresult: modalresultty
) of object;