Программирование на Delphi и не только Как узнать свободный объём ОЗУ? | Программирование на Delphi и не только

Delphi FAQ >> Система

//в байтах
function GetFreeRAM: Cardinal;
var   MS : TMemoryStatus;

begin

  GlobalMemoryStatus(MS);   Result := MS.dwAvailPhys;

end;

Ссылки в тему:
  Как узнать размер ОЗУ?

Проверенные временем Афоризмы о любови — почитайте умные мысли великих людей