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

Вниз

TStringList.CustomSort   Найти похожие ветки 

 
Lera   (2004-05-17 14:07) [0]

Уважаемые, подскажите как с помощью этой функции отсортировать список по убыванию. Спасибо


 
wicked ©   (2004-05-17 14:13) [1]

например так:
function StrComp(List: TStringList, Index1, Index2: integer): integer;
begin
   Result := -AnsiCompareStr(List[Index1], List[Index1]);
end;
.....

myList.CustomSort(@StrComp);


могу где то в чем то ошибаться, поскольку на паскале давно не писал....


 
Palladin ©   (2004-05-17 17:42) [2]

Когда думать то начнем?



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

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

Наверх




Память: 0.46 MB
Время: 0.094 c
7-1082981488
Mesha
2004-04-26 16:11
2004.05.30
Путь к папке Program files


14-1084287762
Help_me_pleas
2004-05-11 19:02
2004.05.30
Нужен совет!


9-1075640127
DrOne
2004-02-01 15:55
2004.05.30
Triangle Strip


6-1081777568
Ivolg
2004-04-12 17:46
2004.05.30
Почта


7-1083125533
you
2004-04-28 08:12
2004.05.30
Как проверить наличие дискеты в дисководе