| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите как наложить два изображения.
R2D2 © (2003-09-04 20:20:00)
Подскажите как програмно наложить два изображения одно на другое
(например лицо на фоне неба)
Сергей А (2003-11-10 08:06:00) [1]
Fon:=TBitmap.Create;
try
Fon.LoadFromFile(NameFon);
Mask:=TBitmap.Create;
try
Mask.LoadFromFile(NameMask);
Mask.Transparent:=true;
Mask.TransparentColor:=$000000;
Mask.TransparentMode:=(tmFixed);
Fon.Canvas.StretchDraw(Rect(0,0,Fon.Width,Fon.Height),Mask);
finally
Mask.Free
end
finally
Fon.SaveToFile(Dest);
Fon.Free
end
| |
