Сортировка в 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]

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

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