Comment : obtenir la mémoire d'un périphérique
Mise à jour : novembre 2007
Pour obtenir la mémoire disponible d'un périphérique, utilisez l'appel de code non managé pour appeler les fonctions GlobalMemoryStatus et GetSystemMemoryDivision natives.
Exemple
Cet exemple de code définit les éléments suivants :
Déclarations d'appel de code non managé pour les méthodes natives dans Windows Embedded CE.
Une structure permettant d'échanger avec les méthodes natives.
Une méthode managée nommée ShowMemory qui affiche la mémoire disponible.
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());
}
Compilation du code
Cet exemple nécessite des références aux espaces de noms suivants :
Voir aussi
Tâches
Comment : obtenir l'ID et le nom du périphérique