Einzelnen Beitrag anzeigen

Der schöne Günther

Registriert seit: 6. Mär 2013
6.155 Beiträge
 
Delphi 10 Seattle Enterprise
 
#4

AW: IEnumerable rückwärts durchlaufen

  Alt 16. Okt 2013, 11:10
Die strikte Vorschrift von "vorwärts" lese ich auch aus der .NET-Doku jetzt nicht heraus. Wenn ich es auf die Schnelle richtig sehe, kann ich den Enumerator, den bsp. eine stinknormale TList zurückgibt, nicht zur Laufzeit ändern, oder? Sonst hätte ich mir ja für den Fall meinen eigenen "Spaß-Enumerator" basteln können...

Die Liste mit Reverse() umzudrehen ist eine gute Idee. Nur leider werkelt da keine Magie im Hintergrund, da wird ja physikalisch wirklich jeder Eintrag mit seinem Gegenstück vertauscht:
Delphi-Quellcode:
procedure TList<T>.Reverse;
var
  tmp: T;
  b, e: Integer;
begin
  b := 0;
  e := Count - 1;
  while b < e do
  begin
    tmp := FItems[b];
    FItems[b] := FItems[e];
    FItems[e] := tmp;
    Inc(b);
    Dec(e);
  end;
end;
Meine Motivation war eigentlich aus Geschwindigkeitsgründen nicht ständig mit einem schrumpfenden Zahlen-Index in die Liste zu greifen sondern den Cursor des Enumerators zu nutzen. Ein Umdrehen der Liste ist zwar wirklich elegant, dauert aber wohl zu lange...
  Mit Zitat antworten Zitat