Source position: msedialog.pas line 66
type stringdialogexeceventty = procedure(
const sender: tcustomdataedit;
var avalue: msestring;
var modresult: modalresultty
) of object;