Delphi.ktop討論區 - 記憶體釋放程式 BCB 版 (附Source Code)

主題：記憶體釋放程式 BCB 版 (附Source Code)
瀏覽次數：9227

dllee
站務副站長

發表：315
回覆：2470
積分：1695
註冊：2002-04-15

發送簡訊給我

發表時間：2002-07-25 12:14:26

IP:61.59.xxx.xxx 未訂閱

看到原本 ddy 發表的主題，小弟很有興趣，於是用 BCB 改寫了，在改寫的過程還發現一些有趣的問題：

// 方法1：無效
char *pBuffer=new char[iFreeSize];
delete [] pBuffer;

// 方法2：有效，要真的去存取資料才會真的配置？！
    char *pBuffer=new char[iFreeSize];
    for(int i=0;i    {
    pBuffer[i]=0x0;
    Application->ProcessMessages();
    }
    delete [] pBuffer;

------
http://blog.yam.com/dllee/

附加檔案：00019848_MemoryFree.zip

dllee
站務副站長

發表：315
回覆：2470
積分：1695
註冊：2002-04-15

發送簡訊給我

發表時間：2002-07-25 12:16:08

IP:61.59.xxx.xxx 未訂閱

我有加入
〔ｃｏｄｅ〕
〔／ｃｏｄｅ〕
為何有些程式碼還是不見？

還有請有興趣的網友自行參考原始碼吧。

發表人 - dllee 於 2002/07/25 12:17:13

------
http://blog.yam.com/dllee/

axsoft
版主

發表：681
回覆：1056
積分：959
註冊：2002-03-13

發送簡訊給我

發表時間：2002-07-25 14:44:39

IP:61.218.xxx.xxx 未訂閱

引言:

我有加入
〔ｃｏｄｅ〕
〔／ｃｏｄｅ〕
為何有些程式碼還是不見？

還有請有興趣的網友自行參考原始碼吧。

發表人 - dllee 於 2002/07/25 12:17:13

可以啦！不過[ code ] [ /code]真的有時候也會出槌!

這個範例粉有趣!實際運作機制不知為何?(向OS爭取空間）

//----------------------------------------------------------------------------//
void __fastcall TFormMemFree::BitBtn1Click(TObject *Sender)
{
    int iFreeSize=StrToIntDef(EditSize->Text,0);
    if(iFreeSize==0) return;

    this->Caption="記憶體釋放中...";
    iFreeSize=iFreeSize * 1024 * 1024;

// 方法1：無效
// char *pBuffer=new char[iFreeSize];
// delete [] pBuffer;

// 方法2：有效，要真的去存取資料才會真的配置？！
    char *pBuffer=new char[iFreeSize];
    for(int i=0;i    {
    pBuffer[i]=0x0;
    this->Caption="記憶體釋放中..."+IntToStr((i>>10)*100/(iFreeSize>>10))+" %";
    Application->ProcessMessages();
    }
    delete [] pBuffer;
    this->Caption="記憶體釋完成!!";
}
//----------------------------------------------------------------------------//

時間就是金錢---[ 發問前請先找找舊文章]

發表人 - axsoft 於 2002/07/25 14:48:46

dllee
站務副站長

發表：315
回覆：2470
積分：1695
註冊：2002-04-15

發送簡訊給我

發表時間：2002-07-25 14:53:42

IP:61.59.xxx.xxx 未訂閱

不行呀，請您注意一下 for loop!!

------
http://blog.yam.com/dllee/

ddy
站務副站長

發表：262
回覆：2072
積分：1153
註冊：2002-07-13

發送簡訊給我

發表時間：2002-07-26 00:28:18

IP:61.59.xxx.xxx 未訂閱

dllee兄
何以真的要存取資料才會配置??
宣告就會配置記憶空間，不然如何存取?
太神奇了:p
這不會是BCB的bug吧?還是和編譯參數有關?

噓~~~~~~沉思中…

dllee
站務副站長

發表：315
回覆：2470
積分：1695
註冊：2002-04-15

發送簡訊給我

發表時間：2002-07-26 09:34:21

IP:61.231.xxx.xxx 未訂閱

引言:

dllee兄
何以真的要存取資料才會配置??
宣告就會配置記憶空間，不然如何存取?
太神奇了:p
這不會是BCB的bug吧?還是和編譯參數有關?
噓~~~~~~沉思中…

您也可以自行試試看呀！
我有試的結果就是這樣... 我也覺得很奇怪。
我有單步執行：

char *pBuffer=new char[iFreeSize];

這一行執行完時，我發現實體記憶體的使用率沒有減少太多，反而是虛擬記憶體的使用率大幅提高，而在執行完

delete [] pBuffer;

所有占用的記憶體就釋放了。
而在使用 for loop 存取時，才發現可用的實體記憶體開始變小，當實體記憶體只剩個位數時，程式執行速度明顯變慢，這是因為系統在實體與虛擬記憶體間交換資料，而因為時間可能會很久，所以我特別加上處理％看看完成度。

我用的系統是 Windows 2000 SP2 中文版。
對了我想問問 ddy ，Windows 對於虛擬記憶體的處理方式為何？
我有一個學弟說，當我執行程式時，程式的所有東東都會放到虛擬記憶體，而將真正有執行到的部分放到實體記憶體中執行，請問是這樣子嗎？
因為我發現，這個記憶體釋放程式（我之前一直在用 Cacheman也是一樣）並無法釋放程式占用虛擬記憶體的大小，只能釋放占用實體記憶體的大小。

發表人 - dllee 於 2002/07/26 14:07:33

------
http://blog.yam.com/dllee/

ddy
站務副站長

發表：262
回覆：2072
積分：1153
註冊：2002-07-13

發送簡訊給我

發表時間：2002-07-26 10:35:12

IP:210.64.xxx.xxx 未訂閱

dllee兄
您那位學弟說的也算沒錯，不過我再補充詳細如下：
Window 的記憶體管理在保護模式之下是線性存取的，以Page Directory 和 Page Table 來實現，當作業系統所剩的實體記憶體不多時，若此時新的程式有較大的記憶空間的需求，系統會依一些機制檢討例如將存在記憶體中最久沒有被執行的程式，將它移至虛擬記憶體中，釋放它佔記憶體的空間。事實上，以被執行的程式角度來看，虛擬或實體的記憶體都是一樣的，只是當這個程式再次被喚起時，作業系統會先完成Swap，就像存在於實體記憶體中一樣。

嗯…釋放虛擬記憶體??…除非這個程式結束才有可能…
就是因為實體記憶體放不下的，所以才放到虛擬記憶體，如果連虛擬記憶體都要釋放，那就把程式結束吧…

呵…我一時記不起來這麼觀念，偷個懶
更詳細的資料我以新主題附上，候俊捷老師的大作『Windows 95 系統程式設計大奧秘》』強烈建議與"作業系統"一書配合著看，會更明白記憶體的運作原理…

噓~~~~~~沉思中…

網站

會員

文章