online 1
gast (50)

/ Forum / Anwendungen(Java,C++...)

Anwendungen(Java,C++...)Anwendungen(Java,C++...)

Fragevon guildowesterlein vom 31.12.2021, 16:27 Options

not found 'Image1' bei auslagerung in andere procedure

(delphi)

ursprünglich hatte ich in
procedure TForm1.FormCreate(Sender: TObject);
und
procedure TForm1.Button6Click(Sender: TObject);
teilweise das selbe stehen und habe es desshalb durch:
vorzeichnen;
ersetzt. weiter oben habe ich dann:
procedure vorzeichnen;
begin
begin WITH Image1.Canvas DO
begin
Rectangle(0,0,Image1.Width,Image1.Height);
// da steht eigentlich noch mehr drin (ähnliches)
end;
end;
end;
hingeschrieben.

das problem ist, dass auf einmal Image1 nicht mehr gefunden wird. Wieso? Was mach ich falsch?


Antwort schreiben

Antwort 1 von son_quatsch vom 08.01.2022, 09:26 Options

Die Prozedur vorzeichnen; gehört nicht zur Klasse TForm1. Das Objekt Image1 ist jedoch in der Klasse TForm1 deklariert, weswegen in deren Prozeduren (z.B. Button6Click(Sender: TObject);) Image1 auch bekannt ist. Außerhalb musst du erstmal auf das Objekt der Klasse TForm1 selbst zugreifen, damit Image1 bekannt ist. Anders ausgedrückt:

procedure vorzeichnen;
begin
  with Form1.Image1.Canvas do begin
    Rectangle( 0, 0, Image1.Width, Image1.Height );
    // da steht eigentlich noch mehr drin (ähnliches)
  end;
end;

...wobei with für Anfänger mit Vorsicht zu genießen ist, da hierbei die Grenzen der Sichtbarkeit einzelner Objekte noch unklarer werden.

Ähnliche Themen

lokales serverprogramm in delphi
hastalavista  23.06.2008 - 68 Hits - 2 Antworten

USB über C++ ansteuern
TByte  23.06.2008 - 43 Hits - 4 Antworten

eingeloggten benutzer mit batch befehl
SirTobi  27.06.2008 - 72 Hits - 3 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026