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

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

Наложение Bitmap [D7, WinXP]


Wadimka ©   (2011-02-19 17:11:00) 

Есть файл, гружу его в TBitmap
Нужно наложить второй, но с форматирование и прозрачностью.

делаю так
var
jpg: TJpegImage;
begin
IMG_MAIN_PICTURE:=TBitmap.Create;
IMG_MAIN_PICTURE.LoadFromFile(Wdir+'base\Podlovka\1.bmp');
jpg:=TJpegImage.Create;

jpg.Transparent:=true;
jpg.LoadFromFile(Wdir+'base\1\15\shablon.jpg');
jpg.Transparent:=true;
IMG_MAIN_PICTURE.Canvas.StretchDraw(rect(0,0, jpg.Width, jpg.Height),jpg);

jpg.Free;
Image1.Picture.Bitmap:=IMG_MAIN_PICTURE;
IMG_MAIN_PICTURE.Free;


Не работает транспарент в Canvas.StretchDraw
Знатоки, как лечить?


brother   (2011-03-01 05:25:00) [1]

> Мне нужна своя функция

чем готовая не угодила?
TransparentStretchBlt()


Wadimka   (2011-02-28 21:30:00) [2]

Я по ходу не так выразился насчет "неважно"
То уже понял, что картинка уже должна быть gif и то что мне не нужно прозрачна.
Мне нужна своя функция TransparentStretchBlt()
где я бы мог указать цвет пикселя, который не должен переносится на копируемый битмат.

Вернее саму процедуру переноса 1 к 1 без Stretch писал, есть варианты со скретчем?


Amoeba_   (2011-02-19 22:13:00) [3]


>  Wadimka   (19.02.11 17:40) [2]
>
> ну не важно, jpg это я так взял

Чудо ты в перьях, раз не важно ...


KilkennyCat   (2011-02-19 19:35:00) [4]


> Wadimka   (19.02.11 17:40) [2]

он и видно. тему тоже "так назвал", описание "так написал", сам ответ на вопрос "так поискал", правила и рекомендации форума "так проглядел".


clickmaker   (2011-02-19 18:05:00) [5]

TransparentStretchBlt()


Wadimka   (2011-02-19 17:40:00) [6]

ну не важно, jpg это я так взял
как замутить можно транспарент и strech?


KilkennyCat   (2011-02-19 17:29:00) [7]

Jpeg не поддерживает альфаканал.


Наверх

Титульная страница Поиск, карта сайта Написать письмо