Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Вниз

Катастрофическое уплывание ресурсов 


valery_f   (2001-12-26 15:03) [0]

После создания (через API) и пользования GDI объектов удаляю их через DeleteObject. Все хорошо, но в некоторых случаях (особенно если частые перерисовки) GDI ресурсы резко начинают уплывать вплоть до нуля, причем после закрытия программы они не восстанавливаются - только перезагрузка. Впервые я заметил это на метафайлах, потом оказалось - с Pen/Brush иногда бывает то же самое. Такое чувство, что DeleteObject на самом деле ничего не удалило... :((( Что это?



Юрий Зотов   (2001-12-26 15:55) [1]

Вот ремарка из описания DelectObject.

Remarks

Do not delete a drawing object (pen or brush) while it is still selected into a device context.
When a pattern brush is deleted, the bitmap associated with the brush is not deleted. The bitmap must be deleted independently.

То есть - проверьте, как у Вас используется SelectObject и не назначаются ли битмапы для кистей.



Юрий Зотов   (2001-12-26 16:09) [2]

Дополнение.

Попробуйте везде заменить вызов DelectObject на такой:
Win32Check(DelectObject(...));

Тогда, по идее, если DelectObject вернет False, то будет автоматически вызвана GetLastError и сгенерено исключение с системным сообщением. Это может помочь в диагностике.



Mirovodin   (2001-12-26 16:21) [3]

Используй отладчик Mem proff http://www.automatedqa.com/ или BoundsChecker http://www.numega.com Очень помогают отследить утечки ресурсов, причем Mem proff прямо дает дельные советы по их устранению.



valery_f   (2001-12-26 17:24) [4]

Спасибо, насчет "selected into DC" я как то не подумал :) Ну, насчет кистей и пр. я понял. А как быть с метафайлами? Вот кусок кода, который, будучи прокручен несколько сотен раз (просмотр файлов перед импортом) опускает GDI ресурсы до нуля:

hMetafile := GetEnhMetaFile(PChar(Filename));
if hMetafile = 0 then ..
try
GetEnhMetaFileHeader(hMetafile,SizeOf(TEnhMetaHeader),@EMF);
...
PlayEnhMetaFile(Bmp.Canvas.Handle,hMetafile,r);
finally
DeleteEnhMetaFile(hMetafile);
end;

Может во время "PlayEnhMetaFile" винда создает еще какие-то объекты и с ними надо что-то делать?




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.012 c
6-79404           soloboev              2001-11-21 14:36  2002.02.25  
Передача срочных данных


3-79289           nobody2002            2002-01-31 13:08  2002.02.25  
Транзакции и ADO: не работает RollbackTrans


6-79409           Дима                  2001-12-07 19:07  2002.02.25  
МАС адрес


6-79406           amamed_3071           2001-12-06 11:37  2002.02.25  
Refresh file list(NMFTP)


3-79301           sdn                   2002-01-30 11:34  2002.02.25  
FireBird и UDF... Проблемы?