Source position: virtualtrees.pas line 1797
type TVTCreateDataObjectEvent = procedure(
Sender: TBaseVirtualTree;
out IDataObject: IDataObject
) of object;