Source position: msegraphedits.pas line 316
type paintpointerglypheventty = procedure(
const sender: tpointeredit;
const acanvas: tcanvas;
const avalue: pointer;
const arow: Integer
) of object;