Source position: comctrls.pp line 1806
type TTreeNodeCompare = function(
Node1: TTreeNode;
Node2: TTreeNode
):Integer of object;