Zugriffsverletzung bei dynamisch erstellten Forms

[shmia]

Zitat von Delix:

Ich will Forms dynamisch in einer Prozedur wie folgt erstellen:

Delphi-Quellcode:

Procedure TFMain.ShowFM(FormName);
var FFormClass: TFormClass;
    FForm: TForm;
begin
  FFormClass := TFormClass(FindClass('T'+FormName));
  FForm.Name:=FormName;
  ...
  FForm.Visible:=True;
end;

Das funktioniert auch.

Nicht wirklich
Dir fehlt was:

Delphi-Quellcode:

Procedure TFMain.ShowFM(FormName);
var FFormClass: TFormClass;
    FForm: TForm;
begin
  FFormClass := TFormClass(FindClass('T'+FormName));
  FForm := FFormClass.Create(nil); // <=================================
  FForm.Name:=FormName;
  ...
  FForm.Visible:=True;
end;