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...