Форум: "Основная";
Текущий архив: 2004.05.30;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.037 c