Source position: msedataedits.pas line 50
type gettexteventty = procedure(
const sender: tcustomdataedit;
var atext: msestring;
const aedit: Boolean
) of object;