Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c
14-1081405937
Игорь Шевченко
2004-04-08 10:32
2004.05.02
Хочу сказать спасибо создателям сайта и тем, кто над ним трудится


3-1081406581
S@shka
2004-04-08 10:43
2004.05.02
Создание БД с таблицей Адрес


4-1078799786
X9
2004-03-09 05:36
2004.05.02
Интеграция в оболочку


3-1080921197
Yozh_Programmer
2004-04-02 19:53
2004.05.02
Как дополнить данные в TDBGrid вручную???


1-1081860253
WondeRu
2004-04-13 16:44
2004.05.02
Полоска в TPopupMenu




   Наверх