Скачать: CL | DM;

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

← →
Georg   (2002-07-15 18:12) [0]

Почему сортируются все Items, кроме последнего? Сделал SortType = stBoth, на OnCompare написал код для сравнения SubItems. Может что-то еще надо?
Заранее благодарю.

---

← →
Song ©   (2002-07-15 18:15) [1]

>Может что-то еще надо?

Надо код onCompare

---

← →
Georg   (2002-07-15 18:19) [2]

try
Datum1 := StrToDateTime(Item1.SubItems[3]);
Datum2 := StrToDateTime(Item2.SubItems[3]);
if Datum1 = Datum2 then
Compare := 0
else
if Datum1 < Datum2 then
Compare := -1
else
Compare := 1;
except
Compare := 0;
end;

---

← →
Georg   (2002-07-15 18:44) [3]

проверял пошагово: для последнего эл-та OnCompare не вызывается...

---

← →
Georg   (2002-07-16 10:32) [4]

может кто-нибудь знает в чем дело?

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.987 c