|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Как отсортировать TList<integer> по убыванию?
Делаю так:
Код:
var List:TList<integer>; function ListSort(Item1, Item2: Pointer): Integer; begin if integer(item1)>=integer(item2) then result:=0 else result:=1; end; begin List:=TList<integer>.Create; List.Add(1); List.Add(4); List.Add(3); List.Sort(ListSort); end; |
#2
|
||||
|
||||
Потому что надо передавать объект сортировки IComparer<T>.
http://docs.embarcadero.com/products...IComparer.html Ну и ф-я должна быть такой: Код:
function (const Left, Right: Integer): Integer begin Result := Right - Left; end — Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |