Source position: virtualtrees.pas line 1813
type TVTAfterItemPaintEvent = procedure(
Sender: TBaseVirtualTree;
TargetCanvas: TCanvas;
Node: PVirtualNode;
const ItemRect: TRect
) of object;