Beliebig viele bzw enig formulare zur laufzeit erstellen....

[Zacherl]

Ich hätte es so gemacht:

Delphi-Quellcode:

var
  Form1: TForm1; formnr: integer; form: tform;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
form := tform.create(nil);
form.name := 'Form'+inttostr(formnr);
formnr := formnr+1;
form.show;
end;