create后一定要free吗？
简单举例
procedure a;
var x:TX;
begin
x:=TX.create;
//do someting;
x.free //如果我这里不free，到了这个end不就是相当于C中的}自动释放吗？
也就是说在此处这个free是多余的。对吗？
end;
但是为了可靠性和可读性，这个Free最好不要省。
而且还要用try...finally...end装起来。
这样即使你在过程中出现异常，也能保证资源能够释放。
|
但是为了可靠性和可读性，这个Free最好不要省。
而且还要用try...finally...end装起来。
这样即使你在过程中出现异常，也能保证资源能够释放。
|
|
但是为了可靠性和可读性，这个Free最好不要省。
而且还要用try...finally...end装起来。
这样即使你在过程中出现异常，也能保证资源能够释放。
|
向你这样，一定要FREE，否则就会有Memory Leak。
但是如果形如x := TX.Create(Application)这样，可以不Free，那么在Application被Free时，Application会替你free的。
Delphi 对象的创建(create)与释放(free/destory)
1、Create参数为:nil/self/application的区别，最好能看到实际效果的区别
例如: My := TMy.Create(X);
其中的 X 将会成为控件 My 的 Owner 属性,
可能会不只一个控件把 X 当作 Owner.
当 X 释放时, 它会同时释放那些把它当作 Owner 的所有控件.
譬如:
btn1 := TButton.Create(Panel1);
btn2 := TButton.Create(Panel1);
btn3 := TButton.Create(Panel1);
当 Panel1.Free 时, btn1、btn2、btn3 都会同时释放.
如果 btn1 := TButton.Create(Self); {譬如 Self 是窗体}
那么窗体释放时, btn1 也会同时释放.
btn1 := TButton.Create(Application);
当程序销毁时也会同时释放 btn1.
这对单窗体程序来讲基本没有区别, 但如果是多窗体就不一样了.
如果 btn1 := TButton.Create(nil);
那么 btn1 得自己负责手动释放(btn1.Free).
你也许会问: 假如 btn1 所在的窗体都销毁了, btn1 还会存在吗?
答: 如果 Application 还在 btn1 不会消失(在 Create(nil) 的情况下).
一般情况下,当 Application 不在了, 系统会释放它所包含的控件.
但等系统来做这件事不是个好习惯, 因为有例外(一般是在跨进程的时候), 有这样一句话:
一个对象分配的内存可能会比对象本身存在的时间长.
2、Delphi的注销方法有两个：Destroy和Free。
Delphi建议使用Free，因为它比Destroy更为安全，同时调用Free会生成效率更高的代码。
您可以用下列的语句释放用完的Employee对象：
Employee.Free;
和Create方法一样，Free方法也是TEmployee从TObject中继承过来的。把您的注销放在tryfinally程序模块的finally部分，
而把对象的程序代码放在try部分是编程的好习惯。这样，即使您的程序代码在使用对象时发生了异常事件，
也会确保您为这个对象分配的内存会被释放。
二者的区别是，Destroy 会直接释放对象，
而Free会事实检查该对象是否存在，如果对象存在，或者对象不为nil，它才会调用Destroy。
因此，程序中应该尽量使用free来释放对象，这样更加安全一些。
（但要注意，free 也不会自动将对象置为nil，所以在调用free之后，最好是再手动将对象置为nil。）
TObject类有一个虚拟的Destroy虚构函数和一个非虚拟的Free函数。Free函数中是调用Destroy的。
因此，当我们对任何对象（都是TObject的子类对象）调用.Free();之后，都会执行TObject.Free();
它会调用我们所使用的对象的析构函数Destroy();。这就保证了任何类型的对象都可以正确地被析构。
