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

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

Либо я совсем идиот... [Delphi, Windows]


Namo ©   (2002-12-20 20:42:00) 

либо тут есть ошибки.
Хочу загружать в один битмап картинки по-очереди а потом их вписывать в другой битмап.т.е. делать ленту спрайтов.
while i<=FileBox.Count do
begin
FileBox.ItemIndex:=i;
BMP.LoadFromFile(FileBox.FileName);
//BMP.Canvas.Draw(XPos,YPos,Stripe.Canvas.Brush.Bitmap);
BitBlt(Stripe.Canvas.Handle,XPos,YPos,0,0,BMP.Canvas.Handle,BMP.Width,BMP.Height,SRCCopy);
SetCoord; //ставлю следующие координаты рисования.
Image.Picture.LoadFromFile(FileBox.FileName);
inc(i);
end;


Namo   (2002-12-21 21:54:00) [1]

Так ведь самый кайф написать самому. Ведь впервую очередь это и интересно, и ПОЛЕЗНО. Но впрочем спасибо, ведь подсмотреть и научиться тоже можно ;))


Mirovodin   (2002-12-20 23:38:00) [2]

Все уже довно написано :))

BMP Creator
http://delphigfx.mastak.ru/tools.htm


Наверх

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