Как я могу получить общий объем памяти, выделенной FastMM?
Я пробовал это:
function GetTotalAllocatedMemory: Cardinal;
var
MMState: TMemoryManagerState;
begin
GetMemoryManagerState(MMState);
Result := MMState.TotalAllocatedMediumBlockSize + MMState.TotalAllocatedLargeBlockSize;
end;
Это правильно?
В любом случае это возвращает что-то странное. В 5 раз меньше, чем значение, которое я вижу в диспетчере задач Windows. Я считаю, что объем памяти, выделенной приложением Delphi, равен памяти, выделенной FastMM, плюс некоторые системные издержки. Я ошибаюсь?