Текущий архив: 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.03 c