| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

Radistka Cat ©   (2006-04-23 12:40:00) 

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

---

Captain   (2006-07-04 12:09:00) [1]

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

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

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

---

antonn   (2006-07-03 19:51:00) [2]

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

---

Мефисто   (2006-07-03 18:56:00) [3]

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


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

 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;

---

Captain   (2006-07-03 18:21:00) [4]

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

Два    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-04-24 02:31:00) [5]

canvas.brush.style:=bsClear   ?

---

Мефисто   (2006-04-23 14:09:00) [6]

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

или

TPaintBox

---

Наверх