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

Вниз

Transparent text   Найти похожие ветки 

 
webpauk   (2004-04-16 14:20) [0]

Хочу в своем компоненте нарисовать текст поверх рисунка. Стандартная фигня не помогает:
DrawText(Canvas.Handle, PChar(Caption), Length(Caption), Rect, DT_END_ELLIPSIS)
рисунок зарисовывается Canvas.Brush.Color.
Может кто знает как Brush.Color сделать прозрачным? (clNone - не подходит)


 
pasha_golub ©   (2004-04-16 14:21) [1]

SetBkMode(Canvas.Handle,TRANSPARENT);


 
Семен Сорокин ©   (2004-04-16 14:22) [2]

Canvas.Brush.Style := bsClear;


 
webpauk   (2004-04-16 14:22) [3]

>pasha_golub
Спасибо


 
pasha_golub ©   (2004-04-16 14:32) [4]

webpauk   (16.04.04 14:22) [3]
Нема за шо



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
1-1082266470
mur
2004-04-18 09:34
2004.05.02
TToolBar


3-1080999487
Nescio
2004-04-03 17:38
2004.05.02
Изменение имени и типа поля


14-1081301245
Skleroz
2004-04-07 05:27
2004.05.02
Все Хабаровчане (или не..), кому время девать некуда - тестируем!


3-1081096181
Walker Hippi
2004-04-04 20:29
2004.05.02
InterBase в сети


7-1078808748
Shark
2004-03-09 08:05
2004.05.02
Delphi и SIEMENS S7