Source position: virtualtrees.pas line 1839
type TVTScrollEvent = procedure(
Sender: TBaseVirtualTree;
DeltaX: Integer;
DeltaY: Integer
) of object;