Source position: virtualtrees.pas line 1818
type TVTPaintEvent = procedure(
Sender: TBaseVirtualTree;
TargetCanvas: TCanvas
) of object;