Как узнать свободный объём ОЗУ?

Delphi FAQ >> Система

//в байтах
function GetFreeRAM: Cardinal;
var
  MS : TMemoryStatus;
begin
  GlobalMemoryStatus(MS);
  Result := MS.dwAvailPhys;
end;

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


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