Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - in Schleife Schleifenzaehlwert aendern


lkz633 - Fr 16.05.03 17:41
Titel: in Schleife Schleifenzaehlwert aendern
Hallo,

ich habe folgenden code:


Delphi-Quelltext 
1:
2:
3:
4:
 
for i:= 0 to stringlist.count-1 do begin
  if blablabala then
    stringlist.delete(i)
end


Dann gibt es natuerlich eine Zugriffsverletzung.
Auch mit

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
 
index:= stringlist.count-1;
for i:= 0 to index do begin
  if blablabala then begin
    stringlist.delete(i);
    index := index-1;
end

geht es nicht.

Wie loese ich das Problem geschickt ?

Gruss und Dank
lkz633


Christian S. - Fr 16.05.03 18:01
Du lässt den Index ganz einfach von oben loslaufen und wirst immer kleiner. Also so:


Delphi-Quelltext 
1:
 
for i:=stringlist.count-1 downto 0 do


MfG,
Peter


lkz633 - Fr 16.05.03 19:46
Hallo,

herzlichen Dank !!!

Aber da haette ich ja auch selber draufkommen koennen :-)

Gruss lkz633


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!