ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как ликвидировать утечку памяти?
7 сообщений из 7, страница 1 из 1
Как ликвидировать утечку памяти?
    #39734500
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AdamAry
Участник
FastMM:
Код: pascal
1.
2.
Аn unexpected memory leak has occurred. the unexpected small block leaks are:
69 - 76 bytes: TEventWaitThread x 1




Как ликвидировать утечку памяти?
...
Рейтинг: 0 / 0
17.11.2018, 12:31
| Ответить | Цитировать | Написать  
Как ликвидировать утечку памяти?
    #39734508
white_nigger
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
white_nigger
Участник
Прибить объект
...
Рейтинг: 0 / 0
17.11.2018, 12:37
| Ответить | Цитировать | Написать  
Как ликвидировать утечку памяти?
    #39734515
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AdamAry
Участник
white_nigger,
пробовал прибить с помощью
Код: pascal
1.
TerminateProcess(GetCurrentProcess,0);


но мне сказали что это слишком экстремальный способ и лучше его не использовать.
...
Рейтинг: 0 / 0
17.11.2018, 13:03
| Ответить | Цитировать | Написать  
Как ликвидировать утечку памяти?
    #39734517
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
AdamAry,

примерно как лечение простуды гильятиной.
...
Рейтинг: 0 / 0
17.11.2018, 13:13
| Ответить | Цитировать | Написать  
Как ликвидировать утечку памяти?
    #39734551
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
defecatorПривилегированный пользователь
Модератор форума
makhaonAdamAry,

примерно как лечение простуды гильятиной.
гильотиной
(с) граммар-наци
...
Рейтинг: 0 / 0
17.11.2018, 15:24
| Ответить | Цитировать | Написать  
Как ликвидировать утечку памяти?
    #39734569
Фэйтл Эра
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фэйтл Эра
Участник
AdamAry,

а почему тебя эта "утечка" расстроила?
Это всего лишь не был вызван деструктор одного объекта к моменту формирования отчета в FastMM4, что не всегда и вовремя проиходит.
В чем беда, память потребляемая пухнет, приложение при завершении зависает или что?

"Неаккуратненько"?
...
Рейтинг: 0 / 0
17.11.2018, 16:19
| Ответить | Цитировать | Написать  
Как ликвидировать утечку памяти?
    #39734715
AdamAry
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AdamAry
Участник
Фэйтл Эра,
да всё нормально, только вот сообщение об утечке как то настораживает "В чем беда, память потребляемая пухнет, приложение при завершении зависает или что?"
Забить на всё и оставить всё как есть?: "Это всего лишь не был вызван деструктор одного объекта к моменту формирования отчета в FastMM4, что не всегда и вовремя просиходит." или всё же вызвать деструктор и уничтожить.
Где и как лучше всего вызвать деструктор?

Деструктор вызывается в *.dpr файле
Код: pascal
1.
2.
3.
...
  if not Application.Terminated and not Thread.ExternalThread then
    FreeEvent;



А вот сам FreeEvent из unit uEventWaitThread;
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
procedure FreeEvent;
begin
  Thread.Terminate;

  CommandEvent := OpenEvent(EVENT_MODIFY_STATE, False, EventName);
  SetEvent(CommandEvent);

  // Закрываем все дескрипторы
  CloseHandle(CommandEvent);
  CloseHandle(ClientMailslotHandle);
end;
{ TEventWaitThread }



Почему всё таки идёт сообщение об утечке и как эту утечку ликвидировать?
...
Рейтинг: 0 / 0
18.11.2018, 08:49
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как ликвидировать утечку памяти?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&msg=39734508&tid=2040112]:
 0ms
get settings:
 11ms
get forum list:
 17ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 178ms
get topic data:
 8ms
get forum data:
 3ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 238ms
total:  508ms
созд. / загр.: 508ms
x
x
Закрыть


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