FastMM: общий объем выделенной памяти

Как я могу получить общий объем памяти, выделенной FastMM?

Я пробовал это:

function GetTotalAllocatedMemory: Cardinal;
var
  MMState: TMemoryManagerState;
begin
  GetMemoryManagerState(MMState);
  Result := MMState.TotalAllocatedMediumBlockSize + MMState.TotalAllocatedLargeBlockSize;
end;

Это правильно?

В любом случае это возвращает что-то странное. В 5 раз меньше, чем значение, которое я вижу в диспетчере задач Windows. Я считаю, что объем памяти, выделенной приложением Delphi, равен памяти, выделенной FastMM, плюс некоторые системные издержки. Я ошибаюсь?

6
задан Roman Yankovsky 29 March 2011 в 09:09
поделиться