Hallo,
hast du das ProcessMessages nun raus ?
Delphi-Quellcode:
X.BeginUpdate;
try
DoSort;
finally
X.EndUpdate;
end;
Als Sortierung wird Quicksort benutzt,
das sollte also auch bei 7000 Einträgen kein Problem sein.
Hast du vielleicht noch irgendwine anderes Ereignis des Treeviews angezapft
(OnChange oder so ?).
Kommentiere doch mal komplett alles aus.
Eine sinnvolle Alternative ist Virtual TreeView (einfach im Netz "virtual treeview Lischke" suchen).
Heiko