Löschen in einer "for in" Schleife

[Furtbichler]

Zitat von himitsu:

Das problem ist, daß der Standard-Enumerator nur den Index und das Ende kennt.

Den Index? Ich dachte immer, ein Eumerator kennt gerade *keinen* Index, sondern nur ein 'Start','Next' und 'Bin ich am Ende?'. Aber, klar: Der spezielle Listen-Enumerator arbeitet natürlich mit einem Index. Aber allgemein gesehen darf ein Enumerator keinen Index kennen. Ein gutes Beispiel ist ein Dataset oder ein Dateiverzeichnis: Dort gibt es wirklich nur die drei o.g. Befehle zum Navigieren.

Da eine For-In-Enumeration in der Umsetzung allgemeingültig sein muss, würde ich mich nie darauf verlassen, wie ein Iterator umgesetzt ist. D.h.: Löschen in Iterator: Nee.

Und deshalb sollte die Remove-Implementierung in der Liste sofort (fail-fast) eine Exception werfen, wenn ein Enumerator aktiv ist. So wie ich das hier lese, scheint das bei Delphi (mal wieder) nur halbherzig, d.h. gar nicht umgesetzt worden zu sein. Oder irre ich mich?

[Perlsau]

Zitat von Furtbichler:

Ein gutes Beispiel ist ein Dataset oder ein Dateiverzeichnis: Dort gibt es wirklich nur die drei o.g. Befehle zum Navigieren.

Theoretisch könnte man in einem Dataset auch mit RecNo navigieren:

Delphi-Quellcode:

Dataset.Last;
for i := 1 to Dataset.RecordCount do
begin
  DataSet.RecNo := i;
  ...
end;

Ist aber kein guter Programmierstil und birgt etliche Fallen. Deshalb: In DataSets immer nur mit Next, Prior, First und Last navigieren und beim Durchiterieren auf DataSet.Eof prüfen.

[dominikkv]

Hey danke für eure Antworten

Das mit dem .ToArray gefällt mir gut (und es klappt sogar ). Das erstellt zwar eine Kopie der Liste, aber das ist in diesem Fall vertretbar.

Zitat von jaenicke:

Zitat von dominikkv:

- Wie löscht ihr bestimmte Einträge aus einer Liste? Eine "for I := Count - 1 downto 0"-Schleife möchte ich vermeiden.

Was spricht denn dagegen? Das wäre ja die schnellste Variante was den erzeugten Code angeht.

Ja das ist in der Ausführung die schnellste Variante, allerdings ist Schnelligkeit nicht immer ausschlaggebend. In meinem Fall habe ich so um die 100 Einträge in der Liste, da lege ich mehr Wert auf Lesbarkeit des Codes, außerdem spare ich somit eine Variable

[jaenicke]

Zitat von dominikkv:

außerdem spare ich somit eine Variable

Die Variable ist ja trotzdem da, nur halt in der zusätzlichen Enumerationsklasse.

[Furtbichler]

Zitat von dominikkv:

Ja das ist in der Ausführung die schnellste Variante, allerdings ist Schnelligkeit nicht immer ausschlaggebend. In meinem Fall habe ich so um die 100 Einträge in der Liste, da lege ich mehr Wert auf Lesbarkeit des Codes, außerdem spare ich somit eine Variable

Ich frage mich wirklich, was daran schlecht lesbar ist:

Delphi-Quellcode:

for i:=Liste.Count-1 downto 0 do 
  if Bedingung(Eintrag[i]) Then 
    Liste.Delete(i);

Oder findest Du die for-Schleife etwa 'old-school'? Den Umweg über ein Array zu gehen ist ja auch nicht gerade direkt, kurz und knapp, oder? Wenn Du das lesbar machen willst, dann benutze Refactoring;

Delphi-Quellcode:

...
LoescheBestimmteElementeAusDer(Liste);
...

Beim Lesen des Codes kann man ja wohl nicht anders, als zu lesen, was dort passiert. Da muss man noch nicht einmal großartig in die Routine reinspringen, weil das ja im Kontext der o.g. Routine sekundär sein dürfte.

Delphi-Quellcode:

Procedure LoescheBestimmteElementeAusDer(Liste : TListe);
var
  i : Integer;
Begin
  for i:=Liste.Count-1 downto 0 do 
    if Bedingung(Eintrag[i]) Then 
      Liste.Delete(i);
End;