Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Дополнение к OnPaint


_Ed_ ©   (2002-12-16 14:28:00) 

Уважаемые мастера!
Когда назначаешь OnPaintлюбому контролу, то ты сам отвечаешь за его
прорисовку... Кто знает, как эту перерисовку не заместить, а дополнить,
т.е. вызвать обработчик OnPaintпо умолчанию, а него вставить свои строки, что-то типа:

MyBitBtn.OnPaint(Sender : PObj(кажется); DC : HDC);
begin
DefaultOnPaint(Sender, DC); // ???
MyPaintProc(Sender, DC);
end;


Заранее благодарен, Сердюк Э.С.


Vladimir Kladov   (2002-12-19 10:13:00) [1]

У панельки много чего рисуется разве. Несложно и полностью
прорисовать. И потом, всегда можно отловить WM_PAINT, послать себе же WM_USER+... и дорисовать что-то еще по его приходу (не забыть сказать Validate, иначе WM_PAINT будет вызываться тогда бесконечно).


_Ed_   (2002-12-18 14:50:00) [2]

Тогда такой вопрос: OnBitBtnDraw вызывается всегда после выполнения OnPaint по умолчанию?
И ещё: как быть с другими объектами, например панельками?


Vladimir Kladov   (2002-12-18 11:30:00) [3]

Для BitBtn как раз есть специальное средство OnBitBtnDraw.


Наверх

Титульная страница Поиск, карта сайта Написать письмо