delphi : 窗体的close,free,destroy

一、我用application.create(TForm2,Form2)语句,创建了Form2,可是调用了Form2.close后,重新调用Form2.show. 刚才所创建的Form2仍然存在。问为了节约资源,应该怎样使用close,free,destroy. 三者的关系是什么?

1、Action:=caFree。

2、 with TForm1.Create(Application) do

Try

ShowModal ;

finally

Free;

end.

在FormClose里写上action := caFree.动态创建窗体用form2:=Tform2.create(application).

释放action:=cafree.

close,只是关掉窗体 .

free,是释放内存资源

destroy既关窗体也释放资源

我理解的不知对不对还请高手进一步说明?

用free就可以,方法和楼上一样,建议不用destory,用free先找,有就自动释放。如果是ShowModual 用FreeAndNil(form1). 来释放资源

Show 用 action := caFree . form1 := nil.

来释放同意楼上,show,还可以用form1.release, form1:=nil.来释放。最好在前面加上if form1 ……

附:

表示关闭的方法有如下几种:

Hide

Close

Free

Release

Destroy

Terminate

FreeAndNil()

Halt

Free:先对象判断不为空再destroy。释放对象,对于窗体来说,只会释放对象,而不将窗体对象的指针指向nil,所以free后用assigned函数来判断还是返回true,只有freeandnil或free后再将指针指向nil。

Destroy:不判断对象是否为空直接释放。如果对象已经释放的话会报错。用destroy不安全,可以说free是对destroy的封装和改进;

Terminate:Application对象的方法,终止整个应用程序,对于控制台程序,必须用halt代替。

Hide:只是将窗体做隐藏处理。

Close:对于窗体而言,close与hide的区别是如果窗体内有方法执行,close会终止窗体对象所执行的方法.而hide不会释放窗体及其所有的对象,更不会使指针指向nil。

Halt:终止整个应用程序。

FreeAndNil (): 释放对象并把指针指向nil,比较的安全且效率会高些,能提高内存的利用率。

Release:调用这个方法时会触发free 事件。Release可以在onshow的事件中调用而free不可以。Release等待资源不再使用后释放资源,同样不修改form指针为nil,所以最好使用release进行资源释放操作。

在对窗体操作时,单纯通过assigned(form1)判断窗体是否已经创建是不够的,因为如果窗体通过free /release进行资源释放的话,form1指向的是一个未知地址,而非nil,所以需要用(not Assigned(ShowForm)) and (not (ShowForm is TForm2)) 来判断该窗体是否已经创建在内存中。

分享: