Source position: msefadeedit.pas line 76
procedure tfadeeditfo.dataenteterev(
const sender: TObject
);