Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.09;
Скачать: CL | DM;

Вниз

Сортитровка в TList   Найти похожие ветки 

 
zeppelin ©   (2003-05-29 15:27) [0]

Добрый день.
Подскажите пожайлуста, как работать с Sort в TList.
Спасибо.


 
reonid ©   (2003-05-29 15:37) [1]

function SomethingCompare(Item1, Item2: Pointer): Integer;
begin
if TSomething(Item1).Value = TSomething(Item2).Value then Result := 0
else if TSomething(Item1).Value > TSomething(Item2).Value then Result := 1
else if TSomething(Item1).Value < TSomething(Item2).Value then Result := -1;
end;

ListOfSomething.Sort(SomethingCompare);


 
Palladin ©   (2003-05-29 15:44) [2]

в справке пример есть!



Страницы: 1 вся ветка

Текущий архив: 2003.06.09;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
3-26369
Sunny
2003-05-21 07:38
2003.06.09
Выпадающий список (локуп поле) из нескольких полей


14-26682
Злодей
2003-05-24 16:57
2003.06.09
Системы исчисления


4-26846
Mike
2003-04-07 22:07
2003.06.09
Можно ли научить frame ловить сообщения, адресованные дочерним ко


14-26777
KSergey
2003-05-21 08:38
2003.06.09
Презентация Microsoft Windows Server 2003


3-26367
Sunny
2003-05-21 08:01
2003.06.09
Отсутствует уникальный ключ