Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.28;
Скачать: CL | DM;

Вниз

Прозрачный цвет.   Найти похожие ветки 

 
Lukashin   (2003-11-22 12:25) [0]

Приветствую. Подскажите пожалуйста.
Создаю на панели TImage, засовываю в него битмап.Его прозрачный цвет оказывается белым, а не цветом фона панели. В чем ошибка, или как это обойти.
Код вставки битмапа такой (в пераметр Window передается собственно панель)
procedure ввввв.AddInfo(Window: TWinControl; Y: Integer;
     Text1, Text2: string; Bitmap: TBitmap = nil);
var  Image: TImage;
begin
....
   Image:=TImage.Create(Window);
   Image.Parent:=Window;
   Image.Picture.Bitmap.TransparentMode:=tmAuto;
   Image.Picture.Bitmap.Transparent:=True;
   Image.Picture.Bitmap:=Bitmap;
   Image.AutoSize:=True;
....


 
Fenik ©   (2003-11-22 13:03) [1]

TransparentColor


 
Lukashin   (2003-11-22 13:20) [2]

Нет. TransparentColor это цвет который в исходном битмапе заменяется на фон. Замена собственно происходит, но почему-то не на цвет панели, а на белый.


 
Pa5ha   (2003-11-22 14:58) [3]

Если не ошибаюсь, то Пиксел с коорд.(0, height-1) задаёт цветовой ключ, хоть TransparentColor, хоть нет.


 
Lukashin   (2003-11-22 15:15) [4]

Проблема как оказалась просто решается.
Надо не
Image.Picture.Bitmap.Transparent:=True;
a
Image.Transparent:=True;

Добрый час на такую фигню потратил...



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

Текущий архив: 2004.03.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
1-1078601071
DIS
2004-03-06 22:24
2004.03.28
WebBrowser


3-1077286652
Крутыш
2004-02-20 17:17
2004.03.28
SyBase!!!


14-1078050891
VMcL
2004-02-29 13:34
2004.03.28
Навеяно постом


14-1077967753
menart
2004-02-28 14:29
2004.03.28
Microsoft прекращает поддержку Windows98!


1-1078500941
Pul
2004-03-05 18:35
2004.03.28
Mathlab и Delphi