Hi,
Schau dir mal die letzte Zeile in dem Code an...
nach dem Aufruf der
ListView.CustomSort(@CustomSortProc, Spalte);
passiert nochwas, nämlich :
Delphi-Quellcode:
{ Set the sort order for the column}
LvSortOrder[Column.Index] := not LvSortOrder[Column.Index];
Das ändert bei jedem Klick die Sortierreihenfolge. Das muss Du auch beim Aufruf mit dem Button mit reinschreiben...
Gruß
