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