Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.11;
Скачать: CL | DM;

Вниз

Как управлять прорисовкой кнопки?   Найти похожие ветки 

 
boband   (2004-07-13 00:41) [0]

Здраствуйте!
Суть в следующем:
Создал своего наследника от TButton, изменил c помощью SetWindowRgn ее форму. Работает... Теперь внутренности кнопки надо прорисовывать, а код:
...
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
...
procedure TMyBtnClass.WMPaint(var Message: TWMPaint);
var
 DC: HDC;
 PS: TPaintStruct;
begin
 inherited;
 DC := BeginPaint(Handle, PS);
 MoveToEx(DC,2,2,nil);
 LineTo(DC,Width,Height);
 EndPaint(Handle, PS);
end;
Почему не рисует ничего :-(
Может я чего не так делаю? Подскажите плиз.

Заранее спасибо.


 
MBo ©   (2004-07-13 08:00) [1]

При создании кнопки в стиль должно быть включено BS_OWNERDRAW.
Понадобится обработка сообщений CN_MEASUREITEM и CN_DRAWITEM.
Для примера посмотри исходники TBitBtn.


 
MBo ©   (2004-07-13 08:12) [2]

хм...  пред. ответ со страницы форума не видно ;)


 
boband   (2004-07-13 19:55) [3]

Спасибо. Теперь все работает!!!



Страницы: 1 вся ветка

Текущий архив: 2005.07.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
1-1118897267
leonidus
2005-06-16 08:47
2005.07.11
Корректное отображение текста в контролах на нерусских ОС


1-1118813345
Layner
2005-06-15 09:29
2005.07.11
А как узнать название формы на которой лежит компанент?


14-1118053014
Vlad Oshin
2005-06-06 14:16
2005.07.11
ЗАВТРА. 1. нареч. На следующий день после сегодняшнего.


3-1117199951
ryds
2005-05-27 17:19
2005.07.11
Слияние двух баз данных InterBase


14-1118651662
syte_ser78
2005-06-13 12:34
2005.07.11
Вопрос по HTML