при нажатии на кнопку должна создаваться новая форма

[***СкаЙ***]

Нда зделать такое:
форма, на ней кнопка, при нажатие на кнопку создаетса новая форма, и так сколько угодно раз. Только старая форма с кнопкой не исчезает, а просто добавляетса форма на екран.
Помогите пожлуйста, на завтра нада !!!

[Jeni]

procedure TForm1.Button1Click(Sender: TObject);
var
  F: TForm;
  B: TButton;
begin
  F := TForm.Create(Application);
    begin
      B := TButton.Create(F);
      B.Parent := F;
      B.Left := 100;
      B.Top := 100;
      B.OnClick := Button1Click;

      F.Left := Random(500);
      F.Top := Random(500);
      F.Show;  // или F.ShowModal; 
    end;
end;

Если на новой форме кнопка не нужна (с тем же функционалом), то переменную B можно убрать.

[***СкаЙ***]

спасибо огромное, все работает !!!!!!!!!!!

[***СкаЙ***]

А можеш еще помочь в проблеме.
Я зделал на форме кнопку при нажатие на какую создавались едиты а не формы. Так вот мне нада еще одна кнопка которая будет удалять тот едит, который я ввел.

[VVM]

Edit1.Free;

[***СкаЙ***]

Это я знаю, но мне нада что бы имя едита вводил пользователь