提问:关于FORM资源释放 不用FREE吧,既然是FORM2的那么FORM2 释放时,自动释放 FTEST呀 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 form1的按钮点击事件中,如下:procedure tform1.button1.click;begin form2 := tform2.create(self); try form2.showmodal; except form2.free; end;end; 同意qhdsfh(飞翔的鹰)procedure tform1.button1.click;begin form2 := tform2.create(self); try form2.showmodal; finally//不管是否异常均可执行 freeandnil(form);//彻底释放并置nil end;end; 在Form2的事件OnClose中加 Form2=nil; Action := caFree; 我创建出FORM2之后,把FORM2 Show了出来,然后在FORM2上做一些操作。那么我在关闭FORM2窗口的时候同时应该释放掉CREATE出来的这个窗口资源啊。Focus(老鱼),照你那样,FORM2一闪既灭了。 Anitya(Treky.Lee),这样的话,是不是说不论我是否正常关闭FORM2窗口,它都会自动释放资源? 我的方法必须要用showmodal模态显示才行呵 基于TPC/IP通讯问题 怎么发送回车键到别的应用程序啊???我怎么用SendMessage,keybd_event都没有反应的?怪! ExcelApplication.Save的问题 PARADOX数据库导入导出问题,急---- 如何在DBEXPRESS下设置数据库查询超时值? 如何用类的继承来实现这个输入检测 高分请教,怎样可以得到本机的硬盘序列号? 如何给新人一个机会?大家都来看看啊。 急急!如何动态指定BDE驱动的路径? 3d模型实现人工智能建立 各位高手,listview问题,急 请问怎样返回当前EXE文件的路径!!!
procedure tform1.button1.click;
begin
form2 := tform2.create(self);
try
form2.showmodal;
except
form2.free;
end;
end;
procedure tform1.button1.click;
begin
form2 := tform2.create(self);
try
form2.showmodal;
finally//不管是否异常均可执行
freeandnil(form);//彻底释放并置nil
end;
end;
在Form2的事件OnClose中加
Form2=nil;
Action := caFree;
Focus(老鱼),照你那样,FORM2一闪既灭了。
必须要用showmodal
模态显示才行呵