![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() Наткнулся на это но по моему тут что то другое показывает
Код:
procedure TForm1.Button1Click(Sender: TObject); var pmc: PPROCESS_MEMORY_COUNTERS; cb: Integer; begin cb := SizeOf(_PROCESS_MEMORY_COUNTERS); GetMem(pmc, cb); pmc^.cb := cb; if GetProcessMemoryInfo(GetCurrentProcess(), pmc, cb) then begin memo1.Lines.Add(Floattostr(pmc^.WorkingSetSize/1024/1024)); end; end; по сути дела же в байтах, перевожу в мб, и получаю 6-7 хотя в диспетчере задач потребляет 1мб, вопрос как получить все таки если этот пример не о том. |
#2
|
||||
|
||||
![]() Вот что мне дала гугля:
Цитата:
Вывод: подсчет памяти для программы - тайна покрытая мраком. ![]() Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#3
|
|||
|
|||
![]() А в таск менеджере включить отображение виртуальной памяти не пробовали?
|
#4
|
||||
|
||||
![]() а мне нужно лог вести чтоб утечку отследить(записываю пришедший запрос и память текущую, следовательно если в следующем будет больше то в предыдущем утечка, сама программа ест 40мб но утечка к концу дня бывает не плохая в размере 1гб), там все очень массивно без лога никак.
|
#5
|
||||
|
||||
![]() Цитата:
![]() Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#6
|
||||
|
||||
![]() так все ж таки никак не узнать ?
![]() |