delphi+sqlserver2000开发资源释放 请问:我在主界面点击菜单后用creat(self),showmodal生成和显示每个子窗口,在子窗体退出中用close,release释放窗体资源,可是通过win2000资源管理器察看内存使用情况发现随着打开、关闭子窗体次数的增多,内存使用也在不断增加,是资源释放的不好还是数据取到缓存无法释放呢?该如何解决?谢谢了。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 创建的时候这样写try if not assigned(Form1) then Form1 := TForm1.Create(Application); Form1.ShowModal;finally FreeAndNil(Form1);end; 请问过客:Create(Application)是创建整个工程的意思吗?我的主窗体是运行后自动生成的,想在点击菜单后生成子窗体,用Create(Application)行吗? release是等到self这个owner被释放以后才释放你的子窗体 在Close事件中加:ACTION:=caFree; Close事件:Form1:=NIL;ACTION:=caFree;打开时候:if Form1=NIL then Form1:=TForm1.Create(self);Form1.show; copy字符串操作出错? 请教高:access violation at address 00237371 in module vcl60.bpl 这个问题始终没有人能帮我解决?(关于报表的)急!! 如把程序最小化到任务栏中? 散分 intraweb之三层开发问题. 关于用DELPHI和MSSQL做一个C/S的简单数据库管理系统的问题!! 请问delphi如何删除一个worksheet... 请推荐一本好的介绍多层次架构编程的书 使用paradox数据库的朋友们,谁知道哪有打开paradox数据库的软件下载?? 用image数据类型存储大文件问题 postmessage的作用 -- 急急
try
if not assigned(Form1) then
Form1 := TForm1.Create(Application);
Form1.ShowModal;
finally
FreeAndNil(Form1);
end;
Form1:=NIL;
ACTION:=caFree;
打开时候:
if Form1=NIL then
Form1:=TForm1.Create(self);
Form1.show;