Ich erzeuge zur Laufzeit eine Form wie folgt;
m1_form := Tm1_form.create(m1_form);
Dann suche ich nach dieser wie folgt;
Delphi-Quellcode:
procedure Ttb_form.Button1Click(Sender: TObject);
var
AForm: TForm;
begin
AForm := TForm(Application.FindComponent('m1_form'));
if AForm = nil then
ShowMessage('Nicht gefunden!');
end;
Aber leider finde ich die Form nicht. Wichtig ist das an der art des findens nichts geändert werden darf!