Работа с оперативной памятью

Автор: | 16.02.2013

Вывести процент загруженности памяти -  GlobalMemoryStatus(mem);  ShowMessage(IntToStr(mem.dwMemoryLoad) + ' %'); // var mem: TMemoryStatus;
Вывести размер физической памяти - GlobalMemoryStatus(mem);  ShowMessage(IntToStr((mem.dwTotalPhys) div 1024) + ' Кбайт'); // var mem: TMemoryStatus;
Вывести размер свободной физической памяти - GlobalMemoryStatus(mem);  ShowMessage(IntToStr((mem.dwAvailPhys) div 1024) + ' Кбайт'); // var mem: TMemoryStatus;
Вывести размер страничной памяти - GlobalMemoryStatus(mem);  ShowMessage(IntToStr((dwTotalPageFile) div 1024) + 'Кбайт'); // var mem: TMemoryStatus;
Вывести размер свободной страничной памяти - GlobalMemoryStatus(mem);  ShowMessage(IntToStr((dwAvailPageFile) div 1024) + 'Кбайт'); // var mem: TMemoryStatus;
Вывести размер swap памяти - GlobalMemoryStatus(mem);  ShowMessage(IntToStr((dwTotalVirtual) div 1024) + 'Кбайт'); // var mem: TMemoryStatus;
Вывести размер свободной swap памяти - GlobalMemoryStatus(mem);  ShowMessage(IntToStr((dwAvailVirtual) div 1024) + 'Кбайт'); // var mem: TMemoryStatus;

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *