Objekteigenschaft in einfacher Prozedur aufrufen

[Tim]

Hallo,
ich hab eine ganz einfache Prozedur start geschrieben, die beim Starten des Programmes aufgerufen wird. In der will ich festlegen, dass ein Image an eine bestimmte Stelle gesetzt wird.

Code: Alles auswählen

 
procedure start;
begin
  Image1.LEFT:=200;
end; 
 

Es tritt folgender Fehler auf:

Code: Alles auswählen

unit1.pas(60,3) Error: Identifier not found "Image1"

Ich bin mir sicher, dass ich irgendwo festlegen muss, dass ich in der Prozedur auf Objekte zugreifen kann. Aber ich weiß nicht wo und wie...

Danke für eure Hilfe

Grüße Tim

[m.fuchs]

start ist bei dir eine normale Prozedur, es muss aber eine Methode von deinem Formular sein sein.

[wp_xyz]

Warum muss das eine einfache Prozedur sein? Sie wird ohnehin nicht ohne das Formular funktionieren, in dem sich das Image befindet - dann wäre eine Methode viel konsistenter. All die Versuche, sich von der objekt-orientierten Programmierung zurück in die prozedurale Programmierung zu mogeln, sind ein Weg in die Steinzeit und von vielen Fallen begleitet.

[Mathias]

Wen es zwingend eine einfache Procedure sein soll, würde dies so gehen:

Code: Alles auswählen

procedure start(Image:TImage);
begin
  Image.LEFT:=200;
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  start(Image1);
end;