我看到Help上有free和release兩個方法 說明好像一樣 只是free多有一個如果必要的話 而目前看到有人在釋放form時用release， 而我之前都是用free Help檔好像是說TCustForm用release 請問我釋放Form最好是用free，還是用release 在請問他們兩個之間有什麼差別~~~ free好像是用來釋放物件，可是Form也是一個物件 那為什麼還要release?? ---------------- 平身進退如殘竹， 一睨人才到處是， 獨被蒼天橫冷劍， 何生英雄來殘我。 ----------------

------
----------------
初出芧房程設師，
左鍵右鼠寫程式，
日扣夜寫眼框溼，
望能早成系分師。
----------------

窗体form用Hide函数将它隐藏起来，然后用Free函数释放它所占据的内存. 而用Release有清除与删除的意思。 -

------
-

可是有一點我不太清楚 Free在Help的解釋是 Destroys an object and frees its associated memory, if necessary. Release在Help的解釋是 Destroys the form and frees its associated memory. 可是我在網路上看到的大部份都是 Form1.free很少用到Form1.release 因為今天忽然看到有人用Form1.release 雖然說Form1是一個Form，造字面上應該用release 但Form1也是一個object，而且free的話還有if necessary才做 感覺上free好像比較好 能再說明清楚或用哪一種來做Form的釋放比較正確!? ---------------- 平身進退如殘竹， 一睨人才到處是， 獨被蒼天橫冷劍， 何生英雄來殘我。 ----------------

------
----------------
初出芧房程設師，
左鍵右鼠寫程式，
日扣夜寫眼框溼，
望能早成系分師。
----------------

引言: 可是有一點我不太清楚 Free在Help的解釋是 Destroys an object and frees its associated memory, if necessary. Release在Help的解釋是 Destroys the form and frees its associated memory. 可是我在網路上看到的大部份都是 Form1.free很少用到Form1.release 因為今天忽然看到有人用Form1.release 雖然說Form1是一個Form，造字面上應該用release 但Form1也是一個object，而且free的話還有if necessary才做 感覺上free好像比較好

Free 和 Release 都一樣, 沒有誰比較好的問題; 以下截錄於 Forms.pas 片段

procedure TCustomForm.Release;
begin
  PostMessage(Handle, CM_RELEASE, 0, 0); // 送出 CM_RELEASE Message 給 Form
end;
宣告 Form 接受 CM_RELEASE Message
procedure CMRelease(var Message: TMessage); message CM_RELEASE;
... 省略 ...
procedure TCustomForm.CMRelease;
begin
  Free; // 也是呼叫 Free
end;

補充說明一下: 雖說 Free 和 Release 都一樣, 但如果您有另外處理 CM_RELEASE Message 的話, Free 並不會觸發 CM_RELEASE Message; 理論上 Free 會比 Release 快一點(因為少了一些步驟) 發表人 - danny 於 2002/11/01 17:12:51