TcxTreeListGetDragDropTextEvent = procedure(Sender: TcxCustomTreeList; ANode: TcxTreeListNode; var AText: string) of object;