简单弹出窗口问题

Question

有一个按扭，点击后打开一个新窗口该怎么做的啊？

Answer 1

form.show 或者 form.showmodal

Answer 2

procedure form1.Button2Click(Sender: TObject);
begin
  if not assigned(form2) then
    form2 := Tform2.Create(self);
  form2.Show;
end;

Answer 3

再建个form2,按钮的onclick事件代码：form2.show

Answer 4

先放一个Topendialog再用if OpenDialog1.execute then
     begin 
    end;

Answer 5

用Topendialog
Opendialog1.execute;