Source position: treegrids.pas line 2084
type TTGAfterItemPaintEvent = procedure(
Sender: TBaseTreeGrid;
TargetCanvas: TCanvas;
Node: PTreeGridNode;
const ItemRect: TRect
) of object;