IWinApplication.GetMemoryStatus

Синтаксис

GetMemoryStatus: IMemoryStatus;

Описание

Метод GetMemoryStatus возвращает информацию о физической и виртуальной памяти компьютера.

Пример

Sub UserProc;
Var
    WinApp: IWinApplication;
    MemStat: IMemoryStatus;
Begin
    WinApp := WinApplication.Instance;
    MemStat := WinApp.GetMemoryStatus;
    Debug.WriteLine("Размер физической памяти: " + (MemStat.TotalPhysicalMemory / 1048576).ToString + " мб");
    Debug.WriteLine("Размер виртуальной памяти: " + (MemStat.TotalVirtualMemory / 1048576).ToString + " мб");
    Debug.WriteLine("Максимальный размер файла подкачки: " + (MemStat.TotalPageFile / 1048576).ToString + " мб");
    Debug.WriteLine("Свободно физической памяти: " + (MemStat.AvailablePhysicalMemory / 1048576).ToString + " мб");
    Debug.WriteLine("Свободно виртуальной памяти: " + (MemStat.AvailableVirtualMemory / 1048576).ToString + " мб");
    Debug.WriteLine("Доступный размер файла подкачки: " + (MemStat.AvailablePageFile / 1048576).ToString + " мб");
    Debug.WriteLine("Процент загрузки памяти: " + MemStat.MemoryLoad.ToString + " %");
End Sub UserProc;

При выполнении примера в консоль среды разработки будет выведена информация о памяти, доступной в операционной системе.

См. также:

IWinApplication