Warum funktioniert der folgenden Code nicht. Es wird immer assigned(tf) als false erkannt, obwohl das Fenster mit dem Namen existiert.
Gibt es einen anderen Weg, herauszufinden ob eine Fenster mit einem bestimmten Namen schon existiert? (nur Fenster aus dem eigenen Programm)
Delphi-Quellcode:
var tf:TForm2;
begin
tf:=Application.FindComponent('test')as TForm2;
if assigned(tf)=false then begin //Form2 mit dem Namen Test wurde nicht gefunden
whith TForm2.create(self) do begin
name:='test';
....
end
end else begin //Form2 mit dem Namen Test wurde gefunden
whith (Application.FindComponent('test')as TForm2) do begin
....
end;
end;
MfG Hitzi
[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]