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中繼承過來的。把您的注銷放在try…finally程序模塊的finally部分，
而把對象的程序代碼放在try部分是編程的好習慣。這樣，即使您的程序代碼在使用對象時發生了異常事件，
也會確保您為這個對象分配的內存會被釋放。

二者的區別是，Destroy 會直接釋放對象，
而Free會事實檢查該對象是否存在，如果對象存在，或者對象不為nil，它才會調用Destroy。
因此，程序中應該盡量使用free來釋放對象，這樣更加安全一些。
（但要注意，free 也不會自動將對象置為nil，所以在調用free之后，最好是再手動將對象置為nil。）
TObject類有一個虛擬的Destroy虛構函數和一個非虛擬的Free函數。Free函數中是調用Destroy的。
因此，當我們對任何對象（都是TObject的子類對象）調用.Free();之后，都會執行TObject.Free();
它會調用我們所使用的對象的析構函數Destroy();。這就保證了任何類型的對象都可以正確地被析構。

?

轉載于:https://www.cnblogs.com/hssbsw/p/3159706.html

總結

以上是生活随笔為你收集整理的Delphi 对象的创建(create)与释放(free/destory)的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。