Ver o quanto de Memória RAM o sistema está ocupando !
Fiz um sistema e preciso saber o quanto de memória RAM ele está consumindo (e se possivel ver outros consumos, como CPU, etc.. ), sei que no Windows 2K/XP é só dar um CTRL+ALT+DEL, que aparece o quanto de memória está sendo usado pelo programa, mas gostaria de fazer isso no WinME ....
Grato
AlphaBlend
Grato
AlphaBlend
Alphablend
Curtidas 0
Respostas
Marcelo.c
12/05/2003
Não sei se é isso que você quer, mas acho que este código pode ajudar:
Verificando a memória
var
MemoryStatus: TMemoryStatus;
begin
MemoryStatus.dwLength:= sizeof(MemoryStatus);
GlobalMemoryStatus(MemoryStatus);
Label1.Caption := ´Total de memória física : ´ + IntToStr(MemoryStatus.dwTotalPhys);
end;
{typedef struct _MEMORYSTATUS}
DWORD dwLength; // sizeof(MEMORYSTATUS)
DWORD dwMemoryLoad; // percentual de memória em uso
DWORD dwTotalPhys; // bytes de memória física
DWORD dwAvailPhys; // bytes livres de memória física
DWORD dwTotalPageFile; // bytes de paginação de arquivo
DWORD dwAvailPageFile; // bytes livres de paginação de arquivo
DWORD dwTotalVirtual; // bytes em uso de espaço de endereço
DWORD dwAvailVirtual; // bytes livres}
Verificando a memória
var
MemoryStatus: TMemoryStatus;
begin
MemoryStatus.dwLength:= sizeof(MemoryStatus);
GlobalMemoryStatus(MemoryStatus);
Label1.Caption := ´Total de memória física : ´ + IntToStr(MemoryStatus.dwTotalPhys);
end;
{typedef struct _MEMORYSTATUS}
DWORD dwLength; // sizeof(MEMORYSTATUS)
DWORD dwMemoryLoad; // percentual de memória em uso
DWORD dwTotalPhys; // bytes de memória física
DWORD dwAvailPhys; // bytes livres de memória física
DWORD dwTotalPageFile; // bytes de paginação de arquivo
DWORD dwAvailPageFile; // bytes livres de paginação de arquivo
DWORD dwTotalVirtual; // bytes em uso de espaço de endereço
DWORD dwAvailVirtual; // bytes livres}
GOSTEI 0
Alphablend
12/05/2003
É MAIS OU MENOS ISSO, SÓ GOSTARIA QUE MOSTRA-SE QUANTO CADA PROGRAMA RODANDO ESTÁ CONSUMINDO ....
GOSTEI 0