Zugriffsverletzung bei Inc()

[fkerber]

Hi!

Ich würde es so machen:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject); 
var i,j,feld : Integer; 
begin 
feld:=0;
for i := 0 to 25 do 
 begin 
   for j := 0 to 31 do 
    begin 
      Spielfeld[Feld] := TSpielfeld.Create(Self); 
      with Spielfeld[Feld] do 
        begin 
         Parent := Form1; 
         Left := i*38 + 20; 
         Top := j*18 + 10; 
         Autosize := true; 
         Cursor := crHandPoint; 
         Hint := ' '; 
         OnClick := Imageladen; 
         OnMouseMove := ShowHint2; 
         Nr := Feld; 
        end; 
      inc(Feld); 
    end; 
 end; 
end;

Ciao Frederic