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