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

Вывести процент загруженности памяти —  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;

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

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