Zugriff auf öffnendes Formular

[bezarre]

Hallo,

ich habe da ein Problem, dass ich einfach nicht gelöst kriege und das mit langsam echt zu schaffen macht.

Ich lasse von Form1(unit1) das Form2(unit2) anzeigen (mit Form2.show). Nun will ich, dass beim Schließen von Form2, eine Funktion in Form1 gestartet wird. Da ich aber bereits bei Form1 in

uses unit2;

stehen habe, kann ich ja nicht mehr bei Form2, unit1 unter uses einfügen. Wie greife ich den nun auf Form1 zu?

Ich habe keine Idee... bitte helft mir.

Gruß
Micha

[Luckie]

Unter imlementation kannst du weitere Units eintragen in einem weiteren uses-Abschnitt.

[bezarre]

Hallo,

danke für die Antwort. Damit klappt das mit dem Focus schonmal sehr gut. Nur wie rufe ich jetzt die Procedure auf?
Ich habe nun folgendes

Delphi-Quellcode:

implementation 

uses unit1;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
   form2.Set_Status(1); // Nicht bzw. wird mir direkt rotmarkiert.
   form2.SetFocus; // Funktioniert
   form1.close;
end;

Ich hoffe auch dafür gibt es eine Lösung. Danke

Gruß
Micha

[bezarre]

Hallo,

habe es jetzt so gelöst, dass die onActive Funktion von Form1, die Funktion startet.
Damit funktioniert des, ist aber nicht so schön. Sollte jemand noch ne Antwort haben, immer her damit.

Gruß

micha