Source position: virtualtrees.pas line 1769
type TVTColumnDblClickEvent = procedure(
Sender: TBaseVirtualTree;
Column: TColumnIndex;
Shift: TShiftState
) of object;