Delphi-Quellcode:
For i := xstelle to xstelle+breite do
begin
For j := ystelle to ystelle - hoehe - (breite div 2) do
begin
ImBebauung.Canvas.Pixels[i,j]<> clwhite;
end;
end;
Das hab ich am Anfang in die Prozedur eingefügt die ein Haus bauen soll. Aber wenn ich das Programm jetzt ausführen möchte kommt folgendes:
Zitat:
[Error] mBebauung.pas(96): E1019 For loop control variable must be simple local variable
[Error] mBebauung.pas(98): E1019 For loop control variable must be simple local variable
[Error] mBebauung.pas(139): E1019 For loop control variable must be simple local variable
[Error] mBebauung.pas(141): E1019 For loop control variable must be simple local variable
[Error] mBebauung.pas(183): E1019 For loop control variable must be simple local variable
[Error] mBebauung.pas(185): E1019 For loop control variable must be simple local variable
[Fatal Error] pBebauung.dpr(5): F2063 Could not compile used
unit 'mBebauung.pas'