Работа с оперативной памятью
Вывести процент загруженности памяти – 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… Читать далее »