Zitat von
Satty67:
Okok... war gestern auch spät und ich war heiterer Stimmung (wie man an meinem Text sieht).
Probier mal, sortieren aus/ein...
Delphi-Quellcode:
L.Sorted := False;
L.Sorted := True;
for i := 0 to L.items.count-1 do L.Items[i]:=copy(L.Items[i],7,length(L.items[i])); //Entfernt die Tage
Scheinbar wird nicht nochmal sortiert, wenn Sorted bereits True ist. Die Hilfe spricht zwar von sortiertem Einordnen, aber das war wohl anders gemeint.
Wobei Luckie's Code natürlich besser aussieht, zumindest anschauen solltest Du Dir den...
Ok, das funzt nicht, Satty67. Wenn ich Sorted vorher auf False setze, ist alles durcheinander.
Ich versuchs mal mit Luckies Code.