Delphi - база знаний

       

Как получить весь размер системной памяти?


Как получить весь размер системной памяти?




function GetMemoryTotalPhys : DWord; 
var 
memStatus: TMemoryStatus;   
begin 
memStatus.dwLength := sizeOf ( memStatus );   
GlobalMemoryStatus ( memStatus );   
Result := memStatus.dwTotalPhys;   
end


Взято с Исходников.ru




Содержание раздела