一、我用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)) 来判断该窗体是否已经创建在内存中。
|
请发表评论