TList.Sort Rückwärts?

[himitsu]

OK, dann ist das 'ne blöde Idee ... dachte die bekommt mit, welche TList zu den Einträgen gehört

Zitat:

(ist schon blöd, wenn die OH nicht läuft man da nicht mal nachsehn kann und auf die Idee mal in D7 zu gucken war ich och nicht gekommen )

aber dann bleibt dir wohl nichts anderes Übrig, als da noch weitere Sortierprozeduren zu erstellen
(eine "lobale" Gloabel variable, wo du extern die Richtung speicherst und das in den Prozeduren abfragst, wäre nicht so gut ... man hätte da zumindestens noch einen weiteren Parameter mit in die Funktion einbauen können, wo man dann noch zusätzliche infost übermitteln kann)

PS: oder du sortierst erstmal die Liste
und sortierst diese danach dann nochmal um, wenn es wückwärst ist

Delphi-Quellcode:

Liste.Sort(...);
if Rückwärts then
  for i := 0 to Liste.Count div 2 - 1 do begin
    P := Liste.Items[i];
    Liste.Items[i] := Liste.Items[Liste.Count - i];
    Liste.Items[Liste.Count - i] := P;
  end;