Делфи 5. Утечка памяти. Опции

[GetSmart]

Есть проект на Делфи 5. Работает сутки и более. В процессе работы вижу в диспетчере задач, что память процесса растёт на 100-200-300 МБ. За сутки может 300 отъесть. Но в алгоритме там реально памяти требуется всего 20-40 МБ. Однако там сотни тысяч-миллионы раз происходит работа со строками (от 1 до 100000 символов длиной). Это единственное подозрение на утечку.

Я правильно понимаю, что если я в процедуре создал строку, то на выходе из этой процедуры Делфа должна сама освобождать указатель строки? И аналогично, если я заполненной строке присваиваю новое значение, то делфа должна сама старую строку удалить из динамической памяти? Или это должен делать программист сам?

Сообщение отредактировал GetSmart - Jan 23 2012, 23:36

[AHTOXA]

А работа с памятью через New/Dispose или GetMem/FreeMem используется? Плагины? Интерфейсы? COM/OLE?
Если нет, то скорее всего всё нормально. Просто происходит фрагментация кучи, и при очередном распределении большой строки для неё не находится свободного непрерывного места, и приходится выделять новый кусок. После достижения какого-то размера этот процесс устаканится, и рост памяти прекратится.

[GetSmart]

А работа с памятью через New/Dispose или GetMem/FreeMem используется?

Это есть при запуске. Как раз выделяются 20-40 МБ. Далее, буквально раз в 5 минут выделяется по 10-100 байт через GetMem(). За сутки GetMem() может выделить от силы мегабайт, скорее в 10 раз меньше.

Плагины? Интерфейсы? COM/OLE?

Только класс TNMHTTP.

Если нет, то скорее всего всё нормально. Просто происходит фрагментация кучи, и при очередном распределении большой строки для неё не находится свободного непрерывного места, и приходится выделять новый кусок.

На 99% не верю. Но хотелось бы как-то проверить это дело. Что показательно, так это то, что выделяемые каждый раз строки полностью удаляются (должны). Фактически строк, которые живут долго и создают фрагментацию я не имею. Хотя... Есть такая штука Memo, в которую медленно добавляется текст и через сутки его объём доходит до 30-200 КБ. Могу добавлять этот текст не в Memo, а в файл, для проверки версии.
Могу даже полностью убрать вызовы GetMem() в процессе работы, выделив мегабайт заранее и потом внутри него линейно выделять куски.
Но хотелось бы не делать лишней работы, и узнать заранее что надо, а что не надо.

После достижения какого-то размера этот процесс устаканится, и рост памяти прекратится.

Не заметил. Стабильно растёт. Тем более, если уже теряется в 10 раз больше, чем необходимо, то это реальный беспредел.

Сообщение отредактировал GetSmart - Jan 23 2012, 16:52

[AHTOXA]

Только класс TNMHTTP.

Ни о чём не говорит Но это вроде как что-то из поставки дельфи? Тогда явные ляпы маловероятны.

На 99% не верю. Но хотелось бы как-то проверить это дело. Что показательно, так это то, что выделяемые каждый раз строки полностью удаляются (должны).

Не верите во что? Строки в дельфи - очень надёжная штука. Мой опыт это подтверждает. У меня есть приложения, которые работают месяцами, при очень активном использовании строк. Так что думаю, что дело не в них.

Не заметил. Стабильно растёт. Тем более, если уже теряется в 10 раз больше, чем необходимо, то это реальный беспредел.

Если есть возможность, то распределяйте/освобождайте память через свою спецфункцию, со счётчиком. То же и со строками. Метод простой и очень эффективный.

[GetSmart]

Не верите во что? Строки в дельфи - очень надёжная штука.

Там было о фрагментации написано, а не о строках.

Если есть возможность, то распределяйте/освобождайте память через свою спецфункцию, со счётчиком. То же и со строками. Метод простой и очень эффективный.

Со строками тот ещё гемор. Тыщи строк кода переписывать и делать через жпу, если я правильно понял. Потому как выражения типа Memo2.Lines.Add(s1+s2) придётся в 10 строк переписывать.

Свой GetMem() писать тоже занятие тяжкое и долгое. Если конечно делать качественно, без потерь памяти.

memavail() и maxavail() выведите в отдельный тред и вызывайте / логьте через какой-то промежуток времени. Если фрагментация - станет ясно через часок.

Не пойму, чем эта статистика лучше чем из диспетчера задач?

Сообщение отредактировал GetSmart - Jan 24 2012, 15:39

[_Pasha]

Не пойму, чем эта статистика лучше чем из диспетчера задач?

Хоть уже и не актуально, но :
мы тогда говорили о фрагментации кучи, я предлагал таким образом установить именно факт утечки памяти из-за фрагментации.

[RabidRabbit]

Везде, где есть New, GetMem или Create - увеличивать глобальный счётчик и писать в лог, где Dispose, FreeMem или Free - счётчик уменьшать и тоже писать в лог. Хорошо помогает (мне, во всяком случае), а на строки в Дельфе можно не пенять (как уже заметили).