Ir para o conteúdo
Mikas

Como verificar a memoria atraves do delphi

Mensagens Recomendadas

Mikas    0
Mikas

procedure EstadoMem;
var
  MemoryStatus: TMemoryStatus;
begin
  MemoryStatus.dwLength := sizeof(MemoryStatus);
  GlobalMemoryStatus(MemoryStatus);
  ShowMessage('Total de Memoria Fisica: ' + IntToStr(MemoryStatus.dwTotalPhys));
end;

Os valores que podem usar para a verificacao de memoria sao:

DWORD dwLength; // sizeof(MEMORYSTATUS)
DWORD dwMemoryLoad; // percentagem 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

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade