delphi中怎么建立新窗体啊

Question

我想在BUTTON1控件中添加代码
单击每一下就会新建一个窗口
最好是两种 
一种是新建空白窗口，另一种是新建的窗口与原
窗口一样讲解一下把  谢谢啊

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin//空白的
  with TForm.Create(Application) do
  begin
    Show;
  end;
end;procedure TForm1.Button2Click(Sender: TObject);
begin//和TForm1一样的
  with TForm1.Create(Application) do
  begin
    Show;
  end;
end;