While schleife endlos? oder nicht?

[Jens Hartmann]

Hallo,

Da gebe ich Chemiker recht, ich habe mal hier eine Stück Code von dir kopiert, schau mal,

Delphi-Quellcode:

begin 
  If Feld[a]>=10 then 
      zahl:=zahl+1; 
      a:=a+1; 
      x:=x+1; 
  else

Wenn man den Code nimmt, wird im Fall von , das if nicht gleich ist, nur die Zeile zahl:= zahl+1 ausgelassen, die anderen Zeilen werden immer ausgeführt.

Der Code sollte also lauten...

Delphi-Quellcode:

begin 
  If Feld[a]>=10 then 
    begin
      zahl:=zahl+1; 
      a:=a+1; 
      x:=x+1
    end 
  else

Bedenke bitte auch, das das 'end' vor dem else, nicht mit einem ';' abgeschlossen wird.


Gruß Jens