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

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

Как из двух bmp файлов сделать один. [D5, Win95/98]


Surprising ©   (2002-01-11 23:24:00) 

Допустим имеется два рисунка в разных bmp файлах как из них сделать один bmp файл чтобы один рисунок был слева а другой справа.


MBo   (2002-01-14 14:05:00) [1]

var b1,b2,b3:tbitmap;
begin
b1:=tbitmap.create;
b2:=tbitmap.create;
b3:=tbitmap.create;
b1.loadfromfile("e:\4.bmp");
b2.loadfromfile("e:\5.bmp");
b3.height:=max(b1.Height,b2.height);
b3.width:=b1.Width+b2.Width;
b3.canvas.Draw(0,0,b1);
b3.Canvas.draw(b1.width,0,b2);
image1.Picture.Assign(b3);
b3.savetofile("e:\45.bmp");


Наверх

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