Schleifendurchlauf abbrechen

[Nightfly]

Hi

ich möchte beim eintreffen einer Bestimmten bedingung den aktuellen (while) Schleifendurchlauf abbrechen, jedoch nicht die ganze Schleife. Sozusagen möchte ich gleich zum nächsten Durchlauf schreiten, ohne den Schwanz abzuarbeiten.

Beispiel wie's nicht geht:

Delphi-Quellcode:

 
count := 0;
i := 0;
while i <= 4 do
           begin
            if i = 2  then break;
            count  := count + i;
           end;

Nach diesem Code ist Count = 1, ich möchte jedoch, das Count = 8 ist, gibts da noch nen anderen Befehl als break?

exit und abort gehen auch nicht. :(

[Khabarakh]

1. Lustige Einrückung :wink:
2. Dein Beispiel erzeugt eine Endlosschleife :gruebel:
3. Ich denke, du suchst Continue

[ichbins]

Du vergisst in der Schleife

[delphi]i:=i+1

[Khabarakh]

Zitat:

Zitat von ichbins

Du vergisst in der Schleife

[delphi]i:=i+1

Dann kann er ja gleich eine for-Schleife nehmen :wink: . Aber es sollte ja auch nur ein Beispiel sein, er hat sich wahrscheinlich vertippt.

[leddl]

Und warum schreibst du nicht einfach

Delphi-Quellcode:

if i <> 2 then
  count := count + i;

Warum kompliziert, wenns auch einfach geht? :gruebel:

[Die Muhkuh]

Zitat:

Zitat von Khabarakh

Zitat:

Zitat von ichbins

Du vergisst in der Schleife

[delphi]i:=i+1

Dann kann er ja gleich eine for-Schleife nehmen :wink: . Aber es sollte ja auch nur ein Beispiel sein, er hat sich wahrscheinlich vertippt.

Ne du, ichbins hat recht.

So wie das Beispiel jetzt ist (auch wenn es falsch ist), wäre das eine Endlosschleife. Du musst schon irgendwo I := I + 1 schreiben.

[Nightfly]

Ja, verzeihung, das Beispiel stammt nicht aus meinem Programm, i zu inkrementieren habe ich wirklich vergessen :oops:

Delphi-Quellcode:

count := 0;
i := 0;
while i <= 4 do
           begin
            if i = 2  then 
                       begin                      
                          i := i+1;
                          Continue;
                       end;
            count  := count + i;
            i := i+1;
           end;

So ists schöner...und macht genau das was ich will, aber die meißten wußten eh was gemeint war.

if <> 2 war leider keine Option, dann könnt ich ja gleich count := 8 machen ;) Das Continue muß ich in der Hilfe irgendwie übersehen haben. :roll:

[leddl]

:gruebel: Warum ist "<>" keine Option? Wenn du weißt, bei welcher Zahl nichts gemacht werden soll, kannst du doch auch einfach eben diese Zahl ausschließen. Zur Not, falls es mehrere Zahlen sind, kannst du ja auch alle diese Zahlen in eine Menge packen und dann überprüfen, ob die Zahl nicht in der Menge ist.

[Nightfly]

In meinem Späteren Programm weiß ich's aber vorher noch nicht, wie gesagt, dies hier ist nur ein einfaches Beispiel, um mein Anliegen zu verdeutlichen. (und in welchem, zugegeben, <> einfacher wäre)

[tomaten]

Zitat:

Zitat von Nightfly

Ja, verzeihung, das Beispiel stammt nicht aus meinem Programm, i zu inkrementieren habe ich wirklich vergessen :oops:

Delphi-Quellcode:

count := 0;
i := 0;
while i <= 4 do
           begin
            if i = 2  then 
                       begin                      
                          i := i+1;
                          Continue;
                       end;
            count  := count + i;
            i := i+1;
           end;

So ists schöner...und macht genau das was ich will, aber die meißten wußten eh was gemeint war.

if <> 2 war leider keine Option, dann könnt ich ja gleich count := 8 machen ;) Das Continue muß ich in der Hilfe irgendwie übersehen haben. :roll:

Autsch, bei der Formatierung wird man ja blind! ;)