在delphi下，如何按下一个按扭，让其弹出一个窗体？

Question

在delphi下，如何按下一个按扭，让其另外弹出一个窗体？

Answer 1

是不是SHOWMESSAGE('怎么不弹出一个窗体？')；是不是这样？

Answer 2

uses form2;application.createform(tform2,form2);
form2.showmodal;
from2.free;

Answer 3

showmessage('')
messagedlg('',mtinformation,[mbok,mbno],0).....................
              mtwarning...............
messagebox(..)............
或者就是楼上人所书

Answer 4

form2.show;  //普通显示
form2.showmodal;  //以摸态显示：不退出form2则调用不返回

Answer 5

将上述代码加到button1的OnClick事件里

Answer 6

onclick
begin
  form:=Tform.Create(nil);
  try
    form.showmodal;
  finally
    form.free;
  end;
end;

Answer 7

try 
  Application.creatform(Tform,form);
  form.showmodal;
finally
  form.destory
end;

Answer 8

var
  Form:TForm
begin
  Form := TForm.Create(self);
try 
  form.showmodal;
finally
  form.destory
end;

Answer 9

先建好一个form2,然后在onclick事件中调用
form2.show
form2.showmodal