Source position: msegraphedits.pas line 366
type paintrealglypheventty = procedure(
const sender: tcustomrealgraphdataedit;
const acanvas: tcanvas;
const avalue: real;
const arow: Integer
) of object;