如何：获取设备内存
更新：2007 年 11 月
若要获取设备的可用内存，请使用平台调用来调用本机 GlobalMemoryStatus 和 GetSystemMemoryDivision 函数。
示例
此代码示例定义下面的内容：
Windows Embedded CE 中本机方法的平台调用声明。
一个要传递给本机方法并从本机方法接收的结构。
一个名为 ShowMemory 的托管方法，显示可用内存。
Public Structure MEMORYSTATUS
Public dwLength As UInt32
Public dwMemoryLoad As UInt32
Public dwTotalPhys As UInt32
Public dwAvailPhys As UInt32
Public dwTotalPageFile As UInt32
Public dwAvailPageFile As UInt32
Public dwTotalVirtual As UInt32
Public dwAvailVirtual As UInt32
End Structure
Public Declare Function GlobalMemoryStatus Lib "CoreDll.Dll" _
(ByRef ms As MEMORYSTATUS) As Integer
Public Declare Function GetSystemMemoryDivision Lib "CoreDll.Dll" _
(ByRef lpdwStorePages As UInt32, _
ByRef ldpwRamPages As UInt32, _
ByRef ldpwPageSize As UInt32) As Integer
Public Shared Sub ShowMemory()
Dim storePages As UInt32
Dim ramPages As UInt32
Dim pageSize As UInt32
Dim res As Integer = _
GetSystemMemoryDivision(storePages, ramPages, pageSize)
' Call the native GlobalMemoryStatus method
' with the defined structure.
Dim memStatus As New MEMORYSTATUS
GlobalMemoryStatus(memStatus)
' Use a StringBuilder for the message box string.
Dim MemoryInfo As New StringBuilder
MemoryInfo.Append("Memory Load: " _
& memStatus.dwMemoryLoad.ToString() & vbCrLf)
MemoryInfo.Append("Total Physical: " _
& memStatus.dwTotalPhys.ToString() & vbCrLf)
MemoryInfo.Append("Avail Physical: " _
& memStatus.dwAvailPhys.ToString() & vbCrLf)
MemoryInfo.Append("Total Page File: " _
& memStatus.dwTotalPageFile.ToString() & vbCrLf)
MemoryInfo.Append("Avail Page File: " _
& memStatus.dwAvailPageFile.ToString() & vbCrLf)
MemoryInfo.Append("Total Virtual: " _
& memStatus.dwTotalVirtual.ToString() & vbCrLf)
MemoryInfo.Append("Avail Virtual: " _
& memStatus.dwAvailVirtual.ToString() & vbCrLf)
' Show the available memory.
MessageBox.Show(MemoryInfo.ToString())
End Sub
public struct MEMORYSTATUS
{
public UInt32 dwLength;
public UInt32 dwMemoryLoad;
public UInt32 dwTotalPhys;
public UInt32 dwAvailPhys;
public UInt32 dwTotalPageFile;
public UInt32 dwAvailPageFile;
public UInt32 dwTotalVirtual;
public UInt32 dwAvailVirtual;
}
[DllImport("CoreDll.dll")]
public static extern void GlobalMemoryStatus
(
ref MEMORYSTATUS lpBuffer
);
[DllImport("CoreDll.dll")]
public static extern int GetSystemMemoryDivision
(
ref UInt32 lpdwStorePages,
ref UInt32 lpdwRamPages,
ref UInt32 lpdwPageSize
);
public void ShowMemory()
{
UInt32 storePages = 0;
UInt32 ramPages = 0;
UInt32 pageSize = 0;
int res = GetSystemMemoryDivision(ref storePages,
ref ramPages, ref pageSize);
// Call the native GlobalMemoryStatus method
// with the defined structure.
MEMORYSTATUS memStatus = new MEMORYSTATUS();
GlobalMemoryStatus(ref memStatus);
// Use a StringBuilder for the message box string.
StringBuilder MemoryInfo = new StringBuilder();
MemoryInfo.Append("Memory Load: "
+ memStatus.dwMemoryLoad.ToString() + "\n");
MemoryInfo.Append("Total Physical: "
+ memStatus.dwTotalPhys.ToString() + "\n");
MemoryInfo.Append("Avail Physical: "
+ memStatus.dwAvailPhys.ToString() + "\n");
MemoryInfo.Append("Total Page File: "
+ memStatus.dwTotalPageFile.ToString() + "\n");
MemoryInfo.Append("Avail Page File: "
+ memStatus.dwAvailPageFile.ToString() + "\n");
MemoryInfo.Append("Total Virtual: "
+ memStatus.dwTotalVirtual.ToString() + "\n");
MemoryInfo.Append("Avail Virtual: "
+ memStatus.dwAvailVirtual.ToString() + "\n");
// Show the available memory.
MessageBox.Show(MemoryInfo.ToString());
}
编译代码
本示例需要引用以下命名空间：