fehler bei break?

[Sharky]

Zitat von Mick:

...und sagt mir was von Unknown identifier was stimmt denn da nicht?
..

Hai Mick,

ich dann auch keinen Fehler sehen. Bei mir wird ohne Probleme compiliert.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 feld     : Array [1..4] of Integer;
 i        : Integer;
begin
 for i:=1 to 4 do  {auf sortiert prüfen}
  begin
   if feld[i+1]>feld[i] then
    begin
     break;  {wenn nicht sortiert abbruch}
    end;
  end;
end;