我有两个form , form1和form2,都为无边框的 ,现在我在form2上放了一个按钮,点击后关闭form2,但是提示出错,好象是application这个东西没结束,和form1还有交流。我想完全释放掉form2,因为每次调用form2上的控件时会出现声音,隐藏的话,声音会还在继续。但是我查了一些贴子,可以在form1中创建form2而不是uses form2可以解决这个问题,但是不知道具体该怎么做,我想在软件打开时,两个界面都同时显示出来,但是formshow函数在做无边框的拖动时已经用了,这个form2该怎么显示出来?请大家都来看看,帮一下!
这个可以能释掉,但是再打开时就出错了!
谁能来看看,怎么解决!
if not Assigned(Form2) then //如果窗体form2还没有创建或被销毁则创建
Form2 := TForm2.Create(Self);
form2.show;
关闭form2时:
在form2的OnClose中写 Action := caFree