我现在由一个MyForm的窗体,我想在MyForm中再次调用MyForm,以此类推,层级不太确定。但是当我退出时MyForm时,最顶部的一个窗体能正常推出,从第二个开始就出现错误,好像是地址错误之类的问题,请求高手给予帮忙。

解决方案 »

  1.   

    delphi 7,xp测试通过。
    我测试了一下,没发现什么问题。打开了大约5个界面。
    1.测试过程如下,一个主界面,一个Test测试界面,类名TFrmTest测试界面有一个按钮,就是再打开一个test界面。主界面有一个按钮打开test界面。
    2.菜单project--options--forms,将frmtest从自动创建列表中移出。
    3.主界面有一个按钮,代码如下,
    var
      t:tfrmtest;
    begin
      t:=tfrmtest.Create(nil);
      t.ShowModal;
      t.Free;
    end;
    4.test界面有一个按钮,代码如下
    var
      f:tfrmtest;
    begin
      f:=TFrmtest.Create(nil);
      f.ShowModal;
      f.Free;
    end;
    //希望对你有帮助。