Schmuddelnötlösung funktioniert.
Jetzte würde ich gerne hier noch die Registrierung so hinbekommen, das ich dies nicht fest vorbelegen muss ? Geht das ? Hier der Code:
Code:
var
Form_Name: String;
MeineForm: TForm;
MeineForm_Klasse: TComponentClass;
begin
...
Form_Name := 'FM_Material' //Beispiel
RegisterClass(TFM_Material); //Das hier würde ich gerne variabel gestalten
MeineForm_Klasse := TComponentClass(FindClass('T' + Form_Name));
MeineForm := TForm(FindComponent(Form_Name));
If MeineForm = nil then Application.CreateForm(MeineForm_Klasse, MeineForm);
MeineForm.Show;
Gruss
Holger