| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

LISTVIEW - Как сортировать элементы не по 1-му столбцу, а по 2-му

Tankist ©   (2005-03-16 09:51:00) 

В TListView стоит вид Report, элементы сортируются только по первому столбцу, а как сделать по второму? Заранее спасибо!

---

Tankist   (2005-03-16 11:33:00) [1]

благодарю!

---

begin...end   (2005-03-16 10:02:00) [2]

> Tankist   (16.03.05 9:51)

procedure TForm1.ListView1Compare(Sender: TObject; Item1, Item2: TListItem;
 Data: Integer; var Compare: Integer);
begin
 Compare := ANSICompareText(Item1.SubItems[0], Item2.SubItems[0])
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 ListView1.AlphaSort
end

---

Наверх