![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как сделать надпись на картинке через Canvas, чтобы она была проз [D7]
Канвас © (2005-06-25 03:17:00)прозрачной ? А то она у меня почему-то фон под текст лепит. А как бы без фону ?
Велосипед (2005-07-04 06:53:00) [1]Удалено модератором
Примечание: Задай вопрос в своей ветке
Канвас (2005-06-30 06:23:00) [2]Спасибо, Татьяна !
Antonn (2005-06-25 10:41:00) [3]Канвас (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-25 09:42:00) [4]>А как в ручную?
В цикле, естественно. В одном месте картинку можешь нарисовать?
Теперь сделай тоже самое столько раз и в тех местах, чтобы получилось ожидаемое
Вик7 (2005-06-25 07:54:00) [5]Удалено модератором
злобная танька (2005-06-25 07:44:00) [6]посмотри Brush.Bitmap.
правда там только 8х8 максимальный размер "текстурки"..
если хочешь больше - придется вручную
Вик7 (2005-06-25 07:41:00) [7]Удалено модератором
Примечание: Задай вопрос в своей ветке
злобная танька (2005-06-25 07:27:00) [8]а может bsClear?
TUser (2005-06-25 05:18:00) [9]Canvas.Brush.Style:=bsSolid