全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1552
推到 Plurk!
推到 Facebook!

SendStream 後要如何完全釋放記憶體

尚未結案
TourNet
一般會員


發表:6
回覆:9
積分:3
註冊:2003-05-06

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-05-25 10:27:35 IP:61.219.xxx.xxx 未訂閱
請教各位大大 小弟最近才剛學Delphi的網路傳輸, 但是不知為何, 檔案傳遞完成後,Server 端的MEM 使用量卻沒有釋放 (我是在Windows 98 下測試的, 若在win2000下就不會有這個問題) FileList.Zip --> 檔案大小為800MB Fst := TFileStream.Create('FileList.Zip',fmOpenRead); Sock.SendStream(Fst); 在檔案傳完畢後, 也用Free 釋放 If Assigned(Fst) Then Begin Fst.Free; Fst:=nil; End; 我的RAM 是512MB, 每次傳完這個檔案, MEM使用量卻在510MB 左右 麻煩各位高手大大幫忙, 謝謝
wnhoo
高階會員


發表:75
回覆:443
積分:198
註冊:2003-04-22

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-05-25 10:42:31 IP:61.155.xxx.xxx 未訂閱
参见: 如何使用NMSTRM做網路的檔案傳輸??   http://delphi.ktop.com.tw/topic.php?TOPIC_ID=29918    供参考!    风花雪月 e梦情缘
------
风花雪月 e梦情缘
william
版主


發表:66
回覆:2535
積分:3048
註冊:2002-07-11

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-05-25 11:20:34 IP:210.3.xxx.xxx 未訂閱
這個可能是 Win 9x 的問題,事實上 9x 系的記憶體管理比 NT 系的爛是不爭的事實。又或者那 500M 都用了作 cache 了,建議用 FreeMem 或 MemTurbo 等的記憶體管理程式試一試。另外 server 端的接收程式如何?問題說不定出現在 server 端。
TourNet
一般會員


發表:6
回覆:9
積分:3
註冊:2003-05-06

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-05-25 12:11:10 IP:61.219.xxx.xxx 未訂閱
引言: 這個可能是 Win 9x 的問題,事實上 9x 系的記憶體管理比 NT 系的爛是不爭的事實。又或者那 500M 都用了作 cache 了,建議用 FreeMem 或 MemTurbo 等的記憶體管理程式試一試。另外 server 端的接收程式如何?問題說不定出現在 server 端。
我用 Iarsn TaskInfo2003 這套管理工具去釋放記憶體 , 確實可以釋放, 我想真如你說的, 被用作Cache 了. 那是不是有什麼方法或程序,可以在程式裡直接釋放Cache. 或者我可以不用裡會Cache,(小弟對於系統的Cache運用不是很了解) 謝謝你們..
william
版主


發表:66
回覆:2535
積分:3048
註冊:2002-07-11

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-05-25 15:49:12 IP:210.3.xxx.xxx 未訂閱
引言:我用 Iarsn TaskInfo2003 這套管理工具去釋放記憶體 , 確實可以釋放, 我想真如你說的, 被用作Cache 了. 那是不是有什麼方法或程序,可以在程式裡直接釋放Cache. 或者我可以不用裡會Cache,(小弟對於系統的Cache運用不是很了解) 謝謝你們..
我想還是不用理好了,或者你可以 GetMem 一大塊記憶體,然後 FreeMem , Windows 應該會釋放 cache 吧。亦可試改 system.ini: [vcache] MaxFileCache=[your max cache in KB] 註: 9x 系一定要加以上 section 才可順利用多過 512M ,反正 9x 系不能善用多過 256M 的記憶體,我想用 NT 系才是上策吧。
wnhoo
高階會員


發表:75
回覆:443
積分:198
註冊:2003-04-22

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-05-25 20:52:54 IP:61.155.xxx.xxx 未訂閱
willian 兄:    您这个GetMem/FreeMem,是创建/释放一个动态变量和一个指向地址块的指针吧。    TourNet 兄:    给你提个建议,您可以加大电脑的虚拟内存看看。    风花雪月 e梦情缘
------
风花雪月 e梦情缘
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-05-25 21:58:44 IP:61.10.xxx.xxx 未訂閱
引言: 我想還是不用理好了,或者你可以 GetMem 一大塊記憶體,然後 FreeMem , Windows 應該會釋放 cache 吧。
這裡有幾個 ddy 副站 以前的作品及轉貼,是與題目有關,亦與 william 兄所提的建議理念相近 : http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19726 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19882 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19878 我覺得 william 兄提出直接 GetMem FreeMem 的方式看起來更簡單直接,但我還沒時間實作過不敢亂說。
TourNet
一般會員


發表:6
回覆:9
積分:3
註冊:2003-05-06

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-05-26 07:51:41 IP:61.219.xxx.xxx 未訂閱
謝謝你們 我現在的做法是在檔案傳送結束後, 利用 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=19726 的方式 將記憶體釋放, 暫時可以解決我先前的問題... (因為小弟不知道如何使用GetMem FreeMem) 不過小弟過些日子會改用 NT , 謝謝大家
Ktop_Robot
站務副站長


發表:0
回覆:3511
積分:0
註冊:2007-04-17

發送簡訊給我
#9 引用回覆 回覆 發表時間:2007-04-26 13:52:42 IP:000.000.xxx.xxx 未訂閱
提問者您好:


以上回應是否已得到滿意的答覆?


若已得到滿意的答覆,請在一週內結案,否則請在一週內回覆還有什麼未盡事宜,不然,
將由版主(尚無版主之區域將由副站長或站長)自由心證,選擇較合適之解答予以結案處理,
被選上之答題者同樣會有加分獎勵同時發問者將受到扣 1 分的處分。不便之處,請見諒。


有問有答有結案,才能有良性的互動,良好的討論環境需要大家共同維護,感謝您的配合。

------
我是機器人,我不接受簡訊.
系統時間:2024-05-05 5:28:48
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!