Problema: determinare la quantità di RAM installata

[The3DProgrammer]

qwer ho un problema....ke API usare per determinare quanta RAM è installata nel sistema....se non mi sbaglio c'è un'API a disposizione...non è ker la conosci?

[The_qwer]

In Visual Basic uso la DLL Kernel32 alias GlobalMemoryStatus: ecco la dichiarazione in VB dell'API:

' CODICE API
Private Declare Sub apiMemStatus Lib "kernel32" Alias "GlobalMemoryStatus" (lpBuffer As MEMORYSTATUS)
Private Type MEMORYSTATUS
dwLength As Long ' Bisogna settarlo a 32
dwMemoryLoad As Long ' RAM usata in percentuale
dwTotalPhys As Long ' RAM totale installata
dwAvailPhys As Long ' Quantità di RAM libera
dwTotalPageFile As Long ' Non lo uso
dwAvailPageFile As Long ' Non lo uso
dwTotalVirtual As Long ' Non lo uso
dwAvailVirtual As Long ' Non lo uso
End Type
'FINE CODICE API

' Ecco poi il codice per calcolare la RAM
Public Sub MemoriaLibera(ByRef btePercentUsed As Byte, ByRef lngTotalRam As Long, ByRef lngFreeRam As Long)
'---------------------------------------------------------------------------
' SUB: MemoriaLibera
'
' lngTotalRam e lngFreeRam indicano la quantita di RAM in kbytes
'
' btePercentUsed - Indica quanta RAM in % è usata
' lngTotalRam - Indica quanta RAM è installata
' lngFreeRam - Tutta la RAM libera
'---------------------------------------------------------------------------
'
Dim Memory As MEMORYSTATUS

' Bisogna settarlo a 32
Memory.dwLength = 32

'Esegue la chiamata API
apiMemStatus Memory

' Riempie delle variabili arbitrarie con le informazioni

btePercentUsed = Memory.dwMemoryLoad
lngTotalRam = Memory.dwTotalPhys / 1024
lngFreeRam = Memory.dwAvailPhys / 1024

End Sub
' Fine codice

Adattala al C++, la sintassi dell'API c'è CMQ

[The3DProgrammer]

ok perfettoz
grazieeeee

[The_qwer]

Allora ti funziona?

[The3DProgrammer]

si tutto a posto


void GlobalMemoryStatus(LPMEMORYSTATUS status)

[The_qwer]

Ah, BENE!!!