Zitat von
Nogge:
Zitat:
Nun möchte ich gern nach dem Erstellen der Form in anderen Procedures auf diese zugreifen.
D.h. deine Methode, Jens Schumann, funktioniert nicht so, wie das gern hätte^^ Ich werde mal schauen, ob ein "array of TForm" für meine Zwecke angebracht ist.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
aForm : TForm2;
begin
aForm:=TForm2.create(Nil); // <-- Hier wird das Form erzeugt
Try
// Hier ist nach der Erzeugung des Formulars
ShowText(aForm); // Auch Formulare können als Parameter übergeben werden.
Finally
aForm.Release;
aForm:=Nil;
end;
end;
Wenn Du auch außerhalb der Methode Button1Click auf
das Form zugreifen möchtest ist der Ansatz das Form lokal zu erzeugen
äußerst ungünstigt. Dann solltest Du ein privates Feld verwenden.