Главная страница
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.019 c
9-26328
ACR
2002-08-03 03:44
2003.06.09
Празрачность


3-26361
Николай
2003-05-20 18:32
2003.06.09
проблема с таблицей


3-26334
DLans
2003-05-19 04:13
2003.06.09
Организация БД на низком уровне


14-26673
Akni
2003-05-21 12:04
2003.06.09
E-Mail Attach


14-26707
Basic
2003-05-21 00:49
2003.06.09
Будет пьянка