Hi!
Ich hab folgende procedure geschrieben:
Delphi-Quellcode:
procedure Zeichnen;
var x,z: integer;
begin
for x:=1 to 15 do
begin
for z:=1 to 10 do
begin
if Eins[x,z]=1 then //zeilen, spaltennummer //wenn die koordinate (x|z) = 1 ist, dann...
PaintBox1.Canvas.Draw(50, 50, Image2.Picture.Graphic);
end;
end;
end;
es kommen aber diese Fehler:
Zitat:
Erzeugen
[Fehler] Unit2.pas(71): Undefinierter Bezeichner: 'PaintBox1'
[Fehler] Unit2.pas(71): Operator oder Semikolon fehlt
[Fehler] Unit2.pas(71): Undefinierter Bezeichner: 'Image2'
[Fehler] Unit2.pas(71): Operator oder Semikolon fehlt
[Fehler] Unit2.pas(74): '.' erwartet, aber ';' gefunden
[Fehler] Unit2.pas(41): Ungenügende Forward- oder External-Deklaration: 'TForm2.Zeichnen'
[Fataler Fehler] Project1.dpr(6): Verwendete
Unit 'Unit2.pas' kann nicht compiliert werden
Danke für eure Antworten
[edit]: hab mich verklickt: falsches Unterforum. Bitte verschieben, vielen dank