eine Form mehrfach öffnen

[Matze]

Bei mir klappt's so, wie im Anhang zu sehen.

Delphi-Quellcode:

procedure TForm1.BtnShowFormsClick(Sender: TObject);
var
  MyFrm: TForm1;
  i: Integer;
begin
  for i := 1 to 20 do
  begin
    MyFrm := TForm1.Create(Application.MainForm);
    MyFrm.Left := Random(Screen.Width - Form1.Width) + 1;
    MyFrm.Top := Random(Screen.Height - Form1.Height) + 1;
    MyFrm.Show;
  end;
end;

Edit: Der Button zum Öffnen von Formularen lässt sich natürlich auch mehrfach anklicken.