TcxGridBandQuickCustomizationColumnCompareEvent = procedure(var ACompareFunction: TListSortCompare) of object;