Source position: virtualtrees.pas line 1841
type TVTGetCursorEvent = procedure(
Sender: TBaseVirtualTree;
var Cursor: TCursor
) of object;