Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Объём оставщейся свободной памяти / 6 сообщений из 6, страница 1 из 1
14.07.2021, 17:51
    #40083858
hlopotun
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объём оставщейся свободной памяти
Для выяснения сколько памяти в процессе расходуется использовал эту функцию:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
function _CurrentProcessMemory: Cardinal;
  var
    MemCounters: TProcessMemoryCounters;
  begin
    MemCounters.cb := SizeOf(MemCounters);
    if GetProcessMemoryInfo(GetCurrentProcess,
        @MemCounters,
        SizeOf(MemCounters)) then
      Result := MemCounters.WorkingSetSize + MemCounters.PagefileUsage
    else
      RaiseLastOSError;
  end;


если исходит из того что результат измеряется в байтах то в процессе выполнения программы получаю результат выходящий за 2Гб в 32х битном приложении (в котором правда активно используются сторонние библиотеки и Com объекты)
Как такое может быть? или сторонние Com работают в своём адресном пространстве?

Тут ещё закралось сомнение, может MemCounters.PagefileUsage уже входит в MemCounters.WorkingSetSize и просто показывает какая часть MemCounters.WorkingSetSize находится в файле подкачки?
Проверил, размер MemCounters.PagefileUsage больще чем у MemCounters.WorkingSetSize. Походу что нет.
...
Рейтинг: 0 / 0
14.07.2021, 18:00
    #40083860
Vizit0r
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объём оставщейся свободной памяти
del
...
Рейтинг: 0 / 0
14.07.2021, 18:02
    #40083864
hlopotun
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объём оставщейся свободной памяти
hlopotun,

тут как то непонятно написано что на самом деле что.
...
Рейтинг: 0 / 0
14.07.2021, 21:57
    #40083913
_Vasilisk_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объём оставщейся свободной памяти
Потому что есть физическая память, а есть виртуальная. Размер физической, действительно, ограничен 2 гигами. Для виртуальной такого ограничения нет.

Подробнее у Рихтера
...
Рейтинг: 0 / 0
15.07.2021, 01:28
    #40083934
DarkMaster
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объём оставщейся свободной памяти
hlopotun,

А можно узнать вообще цель этого телодвижения? Вы пишете свой ProcessExplorer?
...
Рейтинг: 0 / 0
16.07.2021, 12:51
    #40084355
hlopotun
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объём оставщейся свободной памяти
DarkMaster
hlopotun,

А можно узнать вообще цель этого телодвижения? Вы пишете свой ProcessExplorer?


просто надо было количественно проверить размер используемой памяти в рамках одной или нескольких итераций импорта данных.
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Объём оставщейся свободной памяти / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]