Treeview friert beim Sortieren fest

[thomasdrewermann]

Hallo liebe wissende,

ich habe auf meinem Formular einen TreeView mit etwa 7000 Einträgen. Wenn ich den Sortiertyp nun während der Laufzeit auf stText umstelle friert mir mein Listview fest. In dieser Situation ist allerdings keine Methode beim OnCompare Ereignis hinterlegt. Hinterlege ich nun folgende Methode in dem OnCompare-Ereignis,:

Delphi-Quellcode:

Application.ProcessMessages;
Compare := AnsiStrIComp(Pchar(Node1.Text), PChar(Node2.Text));

sortiert mein Programm den Inhalt des Listviews sehr fix. Allerdings hört es damit nicht mehr auf. Die Routine OnCompare wird immer wieder angesprungen.

Ich habe es auch schon mit der CustomSortProc versucht. Es lief auf das selbe Ergebnis heraus.

Kann mir jemand helfen?

Diese Links habe ich schon abgegarst:
http://www.delphipraxis.net/internal...ct.php?t=67837
http://www.delphipraxis.net/internal...ct.php?t=48913
http://www.delphipraxis.net/internal...ct.php?t=23649
http://users.iafrica.com/d/da/dart/z.../TreeView.html

Danke!

Gruß
Thomas