Source position: virtualtrees.pas line 1844
type TVTScrollBarShowEvent = procedure(
Sender: TBaseVirtualTree;
Bar: Integer;
Show: Boolean
) of object;