在D6中下面的代码是可以的
with TForm1.create(self) do
begin
  show;
  free;
end;
但是在D7就不可以了
在D7如何实现类似功能?

解决方案 »

  1.   

    Application.CreateForm(Tfrm1, frm1);
      frm1.ShowModal;
      frm1.Free;
      

  2.   

    with TForm1.create(self) do
    begin
      showModal;
      free;
    end;
      

  3.   

    出现什么错误啊大哥?应该可以的。
    加个
    Application.CreateForm(Tfrm1, frm1);
      frm1.Name:='frm1';
      frm1.ShowModal;
      frm1.Free;
      

  4.   

    好像delphi不允许这样吧,会有问题。
    这不是相当于 自杀 吗?
      

  5.   

    show完就free了,D6中可以看见?是不是onShow中有什么代码?