прозрачность Image

← →
Radistka Cat (2006-04-23 12:40) [0]

Есть IMAGE на всю форму
в Него загружена картинка
Есть ещё IMAGE2(пустой) тоже на всё форму
КАк сделать так чтобы на Канвасе IMAGE2 можно было рисовать линии
но в местах без линий Был виден IMAGE
т.е сделать канвас Image2 сделать прзрачным.

← →
Мефисто (2006-04-23 14:09) [1]

TImage.Picture.Bitmap.Transparent
TImage.Picture.Bitmap.TransparentColor
TImage.Transparent

или

TPaintBox

← →
Серджинйо (2006-04-24 02:31) [2]

canvas.brush.style:=bsClear ?

← →
Captain © (2006-07-03 18:21) [3]

У меня такая же проблема есть.
только прозрачности не добиваюсь :(

Два Bmp файла
MyRect := Rect(10,10,100,100); MyOther := Rect(10,111,100, 201); Bitmap1 := TBitmap.Create; Bitmap1 := image2.Picture.Bitmap; Bitmap1.TransparentColor:=clWhite; Bitmap1.Transparent:=true; Bitmap1.Transparent:=true; image1.Picture.Bitmap.TransparentColor:=clWhite; image1.Picture.Bitmap.Transparent:=true; image1.Transparent:=true; image1.Canvas.CopyRect(MyOther,Bitmap1.Canvas,MyRect); // image1.canvas.brush.style:=bsClear; image1.Picture.SaveToFile("c:\ff.bmp");

Чего только не пробовал :) - сделал прозрачным обе картинки даже :(
Может это из-за формата bmp?

← →
Мефисто (2006-07-03 18:56) [4]

> У меня такая же проблема есть.

А в чем заминка?

var
B: TBitmap;
begin
Image.Transparent := True;
B := TBitmap.Create;
try
B.LoadFromFile("C:\1.bmp");
B.TransparentColor := clBlack;
B.Transparent;
Image.Canvas.CopyRect(B.Canvas.ClipRect, B.Canvas, B.Canvas.ClipRect);
finally
B.Free;
end;
end;

canvas.draw() рисует с "прозрачным" цветом.
могу предложить сходить сюда: http://kladovka.net.ru/index.cgi?pid=list&rid=252

1-й ответ не пашет :(
точнее накладывает, но не делает прозрачным фон - всё, логично, парвильно, но..тупая система видать..или я :)

из кладовки - супер работает - спасибо!!!

может кто еще подскажет то же самое, но для работы с gif"ами, а не bmp?

прозрачность Image Найти похожие ветки