[分享]如何優化記憶體

Super-Tomato

作者 : Super-Tomato


昨天看到了篇帖子寫到 Firefox 記憶體溢出的問題, 所以今天周末有空就來分享如何優化記憶體分配的編程
一開始未看到這篇文章前, 應該很多人都認為這是個很複雜的技術, 但看完之後會偷笑原來這是那麼簡單就可以實現的
沒錯, 在早期要優化記憶體這種技術應該很複雜也輪不到我這種菜鳥來寫, 但 Windows 已經把這項工程給簡化了,
所以我們只要輕鬆的套用 WINAPI 就能夠解決這個問題.


那麼到底要用哪些 WINAPI 呢??
最主要的當然就是使用 EmptyWorkingSet 回收記憶體了, 這一個函數可以大大改善記憶體的使用, 至於說明就請搜索微軟的 WINAPI 吧

p/s: 但是要記得的是縮小了記憶體並非代表程式的執行速度加快了

以下是以 BCB 針對 Firefox 做為範例和演示

1. 
   
2. //---------------------------------------------------------------------------
   
3. 
   
4. #include <vcl.h>
   
5. #include <psapi.h>
   
6. #pragma comment(lib, "psapi.lib")
   
7. #pragma hdrstop
   
8. 
   
9. #include "Unit1.h"
   
10. //---------------------------------------------------------------------------
    
11. #pragma package(smart_init)
    
12. #pragma resource "*.dfm"
    
13. TForm1 *Form1;
    
14. //---------------------------------------------------------------------------
    
15. __fastcall TForm1::TForm1(TComponent* Owner)
    
16.         : TForm(Owner)
    
17. {
    
18. }
    
19. //---------------------------------------------------------------------------
    
20. void __fastcall TForm1::Timer1Timer(TObject *Sender)
    
21. {
    
22.         HWND firefox = FindWindow("MozillaUIWindowClass", NULL);
    
23.         if(firefox)
    
24.         {
    
25.                 DWORD dProcessID;
    
26.                 HANDLE hProcess;
    
27. 
    
28.                 GetWindowThreadProcessId(firefox, &dProcessID);
    
29.                 if(dProcessID)
    
30.                 {
    
31.                         hProcess = OpenProcess(PROCESS_ALL_ACCESS, true, dProcessID);
    
32.                         if(hProcess)
    
33.                         {
    
34.                                 SetProcessWorkingSetSize(hProcess, 0, 0);
    
35.                                 EmptyWorkingSet(hProcess);
    
36.                                 CloseHandle(hProcess);
    
37.                         }
    
38.                 }
    
39.         }
    
40. }
    
41. //---------------------------------------------------------------------------
    
42. 
    

复制代码

演示(非永久性連結)

[ 本帖最后由 Super-Tomato 于 2008-11-8 01:09 PM 编辑 ]

goodhermit95

C++ Declare API真方便
请问可以翻译成C#.NET或VB.NET 吗？

goodday

按错 加多了

青菜啦~~

Super-Tomato

原帖由 goodhermit95 于 2008-11-8 08:32 PM 发表

C++ Declare API真方便
请问可以翻译成C#.NET或VB.NET 吗？

所有的語言都一樣, 只是你沒看到 header 檔怎麼定義了 Entry Point
VB.NET 做法也一樣啊, 簡單的例子就是

1. 
   
2. Public Class Form1
   
3. 
   
4.     Declare Function FindWindow Lib "user32" Alias "FindWindowW" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
   
5. 
   
6.     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
   
7.         Dim firefox As IntPtr
   
8. 
   
9.         firefox = FindWindow("MozillaUIWindowClass", vbNullString)
   
10.         If Not firefox.Equals(0) Then
    
11.             Debug.Print("Found Firefox!!")
    
12.         End If
    
13.     End Sub
    
14. End Class
    

复制代码

goodhermit95

看到了
哪么优化的部分是一样的吧？
如果要优化全部，那么要用For Each吗？

Super-Tomato

原帖由 goodhermit95 于 2008-11-9 09:09 AM 发表

看到了
哪么优化的部分是一样的吧？
如果要优化全部，那么要用For Each吗？

我說了這只是針對 Firefox, 所以我只取唯一一個進程, 不明白的函數最好去搜索 msdn 的說明
至於你說全部, 那麼你就該先學習怎麼弄個 TaskManager, 之後就會明白怎麼用了

goodday

看到了 番茄的功力
佩服

我只专.net 你好像全部都 会

goodhermit95

懂了懂了，For Each processs in system.diagnostics.getprocess

late_boy

看似是调用SetProcessWorkingSetSize函数~

Super-Tomato

原帖由 goodday 于 2008-11-9 04:49 PM 发表
看到了 番茄的功力
佩服

我只专.net 你好像全部都 会

都懂一些些混口飯吃而已, 最重要的還是貴在精...

原帖由 goodhermit95 于 2008-11-9 05:58 PM 发表
懂了懂了，For Each processs in system.diagnostics.getprocess

希望你別讓系統崩潰了

原帖由 late_boy 于 2008-11-9 11:48 PM 发表
看似是调用SetProcessWorkingSetSize函数~

SetProcessWorkingSetSize 中說明了大小都設定為 -1 的時候會移除Paging, 但對於 Win2K 和 Win2003 Server 來說沒打上補丁的系統來說完全沒反應, 所以配合 EmptyWorkingSet 是個互補. 當然在有了補丁的情況下使用前者更為方便, 因為根本不用再嵌入任何 dll


補充 :  
http://support.microsoft.com/kb/823684

[ 本帖最后由 Super-Tomato 于 2008-11-10 05:44 AM 编辑 ]