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

Как сделать надпись на картинке через Canvas, чтобы она была проз   Найти похожие ветки 

← →
Канвас   (2005-06-25 03:17) [0]

прозрачной ? А то она у меня почему-то фон под текст лепит. А как бы без фону ?

---

← →
TUser ©   (2005-06-25 05:18) [1]

Canvas.Brush.Style:=bsSolid

---

← →
злобная танька   (2005-06-25 07:27) [2]

а может bsClear?

---

← →
Вик7   (2005-06-25 07:41) [3]

Удалено модератором
Примечание: Задай вопрос в своей ветке

---

← →
злобная танька   (2005-06-25 07:44) [4]

посмотри Brush.Bitmap.
правда там только 8х8 максимальный размер "текстурки"..
если хочешь больше - придется вручную

---

← →
Вик7   (2005-06-25 07:54) [5]

Удалено модератором

---

← →
ЮЮ ©   (2005-06-25 09:42) [6]

>А как в ручную?

В цикле, естественно. В одном месте картинку можешь нарисовать?
Теперь сделай тоже самое столько раз и в тех местах, чтобы получилось ожидаемое

---

← →
Antonn ©   (2005-06-25 10:41) [7]

Канвас   (25.06.05 3:17)
для нужного канваса SetBkMode(canvas.Handle, TRANSPARENT);, потом просто выводить текст.

Вик7   (25.06.05 7:41) [3]
велосипед:
procedure FillTextrutka2canvas( Acanvas:Tcanvas; _Texturka:Tbitmap);
var i,ii:integer;
begin
for i:=0 to (Acanvas.ClipRect.Right div _Texturka.Width) do
 for ii:=0 to (Acanvas.ClipRect.Bottom div _Texturka.Height) do
 Acanvas.CopyRect(rect(i*_Texturka.Width,ii*_Texturka.Height,(i+1)*_Texturka.Width,(ii+1)*_Texturka.Height), _Texturka.Canvas ,rect(0,0,_Texturka.Width,_Texturka.Height));
end;

---

← →
Канвас   (2005-06-30 06:23) [8]

Спасибо, Татьяна !

---

← →
Велосипед   (2005-07-04 06:53) [9]

Удалено модератором
Примечание: Задай вопрос в своей ветке

---

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

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



Память: 0.46 MB
Время: 0.024 c