TTVCompareEvent = procedure (Sender: TObject; Node1, Node2: TTreeNode; var Compare: Integer)
Вызывается для сравнения узлов во время сортировки в дереве.
Параметры:
Ссылки: TTreeView.OnCompare