procedure kennt keine Objekte

[delphi-n]

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 :)

[Klaus01]

.. versuche mal

Delphi-Quellcode:

procedure TForm2.Zeichnen;

Grüße
Klaus

[himitsu]

[dp]"undefinierter bezeichner"[/dp] :

http://www.delphipraxis.net/internal...ter+bezeichner

[delphi-n]

klappt :thumb:

danke, so schnell war ein Problem noch nie gelöst :-D