最近由 D6 轉到 D2010 ，之前d6 泛型及雜湊表 都是使用  jcl 的 TjclStrHashMap 及 TjclVector ，現在剛接觸 2010 ，看到它有泛型之後就來試試看了，可以的話就可以捨棄jcl的 TjclStrHashMap了。
但我發現它會有記憶體釋放的問題，附件是我的測試程式，一直按下 button1 ，記體會明顯的增加，可是我明明有呼叫 tobjectdictionary.clear，將放在 tobjectdictionary 內的物件清除掉了啊，為何記憶體還會持續增加??

請各位大德指點一下我哪裡有寫錯，謝謝。

附加檔案：4ff1a260123d2_test.rar

Clear只是將容器清空 ,物件還在記憶體中 
在容器清空前 手動Free即可

date.Clear;

另外 推薦你可以使用Fastmm4 檢查記憶體有沒有洩漏

===================引 用 wangccw 文 章===================
最近由 D6 轉到 D2010 ，之前d6 泛型及雜湊表 都是使用 jcl 的 TjclStrHashMap 及 TjclVector ，現在剛接觸 2010 ，看到它有泛型之後就來試試看了，可以的話就可以捨棄jcl的 TjclStrHashMap了。
但我發現它會有記憶體釋放的問題，附件是我的測試程式，一直按下 button1 ，記體會明顯的增加，可是我明明有呼叫 tobjectdictionary.clear，將放在 tobjectdictionary 內的物件清除掉了啊，為何記憶體還會持續增加??

請各位大德指點一下我哪裡有寫錯，謝謝。

jcl 的 TjclStrHashMap 可以設定是否要讓自已管理物件，亦即當 TjclStrHashMap.clear 之後，裡面存放的物件會自動 free 掉。
tobjectdictionary 還要手動清除物件，這樣實在不怎麼優。

另外 delphi 2010 是否還需要 Fastmm4 來加強管理記憶體 ?

編輯記錄

Hi,

TObjectDictionary 有另提供多種 constructor Create(),

你要的功能, 只要將

date := TObjectdictionary.create;

這行改為下列方式

date := TObjectdictionary.create([doOwnsValues]);

即可達到,.

可參考 Help 裏的說明.

===================引 用 wangccw 文 章===================
jcl 的 TjclStrHashMap 可以設定是否要讓自已管理物件，亦即當 TjclStrHashMap.clear 之後，裡面存放的物件會自動 free 掉。
tobjectdictionary 還要手動清除物件，這樣實在不怎麼優。

另外 delphi 2010 是否還需要 Fastmm4 來加強管理記憶體 ?

謝謝 tick228 , leveon 的回覆：
的確只要create時加上[doownsValues]，即可解決這個問題。

感謝~~

===================引 用 tick228 文 章===================
Hi,

TObjectDictionary 有另提供多種 constructor Create(),

你要的功能, 只要將

date := TObjectdictionary