klick auf button -> mehrere fenster öffnen sich - WIE ?

[Tyrael Y.]

Wilkommen erst einmal im Forum.

Ich weiss ja nicht ob du die Formulare, die du öffnen möchtest schon hast.

Aber hier mal so aus dem stehgreif, wenn die Formulare zur Laufzeit erstelt werden sollen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var aForm:TForm;
    i:integer;
begin
  for i := 0 to StrToInt(Edit1.Text) - 1 do
  begin
   aForm := TForm.Create(nil);
   aForm.Show;
  end;
end;

du musst natürlich noch irgendwo die erzeugten Formulare wieder freigeben.


Gruß

Tyrael