Source position: synedittypes.pp line 130
type TSynPaintEventProc = procedure(
Sender: TObject;
EventType: TSynPaintEvent;
const rcClip: TRect
) of object;