NSIS 获取物理内存

admin

1. 
   
2. !addplugindir .
   
3. 
   
4.     Name Memory
   
5.     OutFile Memory.exe
   
6. 
   
7.     XPStyle on
   
8.     InstallColors /windows
   
9.     ShowInstDetails show
   
10.     RequestExecutionLevel admin
    
11. 
    
12.     Page instfiles
    
13. 
    
14.     Section Install
    
15. 
    
16.         # 获取系统已识别的总内存大小
    
17.         # Windows XP、2003 通过 Windows API 只能获取到这个大小
    
18.         System::Call "*(i64,i,l,l,l,l,l,l,l)i.R0"
    
19.         System::Call "kernel32::GlobalMemoryStatusEx(iR0)"
    
20.         System::Call "*$R0(i,i,l.R1)"
    
21.         System::Free $R0
    
22. 
    
23.         # 通过 Windows API 将数值格式化为“字节、KB、GB 单位”
    
24.     !ifndef NSIS_UNICODE
    
25.         System::Call "shlwapi::StrFormatByteSize64A(lR1,t.R2,i${NSIS_MAX_STRLEN})"
    
26.     !else
    
27.         System::Call "shlwapi::StrFormatByteSizeW(lR1,t.R2,i${NSIS_MAX_STRLEN})"
    
28.     !endif
    
29.         DetailPrint "已识别内存大小：$R2 ($R1)"
    
30. 
    
31.         # 获取系统已安装的总内存大小
    
32.         # 以下代码仅在 Windows Vista 或更高的系统有效
    
33.         System::Call "kernel32::GetPhysicallyInstalledSystemMemory(*l.R1)"
    
34.         System::Int64Op $R1 << 10
    
35.         Pop $R1
    
36. 
    
37.         # 通过 Windows API 将数值格式化为“字节、KB、GB 单位”
    
38.     !ifndef NSIS_UNICODE
    
39.         System::Call "shlwapi::StrFormatByteSize64A(lR1,t.R2,i${NSIS_MAX_STRLEN})"
    
40.     !else
    
41.         System::Call "shlwapi::StrFormatByteSizeW(lR1,t.R2,i${NSIS_MAX_STRLEN})"
    
42.     !endif
    
43.         DetailPrint "总安装内存大小：$R2 ($R1)"
    
44. 
    
45.     SectionEnd
    

复制代码