Source position: comboex.pas line 52
type TListCompareEvent = function(
AList: TListControlItems;
AItem1: TListControlItem;
AItem2: TListControlItem
):Integer of object;