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

@jose 

Для получения информации о количестве занимаемой приложением оперативной памяти в Delphi вы можете использовать функцию GetProcessMemoryInfo, которая определена в библиотеке psapi.dll.

Вот пример кода, который демонстрирует использование этой функции:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15

uses
  Psapi;

procedure GetMemoryUsage(var MemUsage: Cardinal; var PeakMemUsage: Cardinal);
var
  ProcessHandle: THandle;
  ProcessMemoryCounters: TProcessMemoryCounters;
begin
  ProcessHandle := GetCurrentProcess;
  if GetProcessMemoryInfo(ProcessHandle, @ProcessMemoryCounters, SizeOf(ProcessMemoryCounters)) then
  begin
    MemUsage := ProcessMemoryCounters.WorkingSetSize;
    PeakMemUsage := ProcessMemoryCounters.PeakWorkingSetSize;
  end;
end;

Эта функция сохраняет текущее количество оперативной памяти, используемой приложением, в переменной MemUsage, а максимальное количество оперативной памяти, использованное приложением, в переменной PeakMemUsage.

Вы можете вызвать эту функцию в любом месте вашего кода, чтобы получить текущую информацию об использовании оперативной памяти вашим приложением.