ListView 2 mal Sortieren nicht möglich?

[Flom]

Hallo,
Ich versuche nun seit 3 Stunden verzweifelt ein ListView Feld mit Hilfe der Code-Library zu Sortieren: Folgender Link:
http://www.delphipraxis.net/internal...light=listview

Nun möchte ich jedoch Feld 0 & 1 Sortieren und später dann vielleicht noch nach dem Daten Herkunfts Pfad : also dachte ich, ich mache es einfach so:

Delphi-Quellcode:

ColumnToSort := 0; //hier also der Index der Spalte, nach der Sortiert werden soll
ListView4.AlphaSort;
ColumnToSort := 1; 
ListView4.AlphaSort;
ColumnToSort := 3; 
ListView4.AlphaSort;

doch leider Sortiert er jedesmal nur Spalte 0 warum & wie kann ich mein Problem Lösen?

Grüße Flom!