如何彻底释放窗体？（29分全给了，来拿啊，呵呵……）

Question

Action:=cafree;
就是彻底释放啊！

Answer 1

先后执行下面的语句：
Formname.free;
Formname:=NIL;
这样，你的窗体就可以完全释放了：）

Answer 2

全都不行，莫非这是Dephi的bug?还是其他的什么原因？

Answer 3

你可以试着增加一个新窗体,看内存使用情况.
     再试着释放,看内存使用情况.对比一下.
因为DELHI是使用了许多面向对象的特性,故你的窗体也就那么点大吧.

Answer 4

在你使用CAFREE时,它将关闭改FORM,同时FREE所有相关的内存. 你若不信,请参阅DELPHI'S HELP. 请看ORIGINAL STATEMENT FROM HELP:caFree The form is closed and all allocated memory for the form is freed.
To close and form and free it in an OnClose event, set Action to caFree.
如果你认为资源没有全部释放,那一定出自别的原因.

Answer 5

在窗体中加入以下ok
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
action:=cafree;
end;