Навигация
Поддержать материально
Steam Greenlight

Логотипы
Медальки
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Темы форума
187 - Bullet Heaven
Сегодня, 14:55
 Shirson
187 - ?
21.11.2024
 Dan
Galactic Showdown -…
21.10.2024
 KregHek
Новый IGDC
5.08.2024
 rimush
186 - Strategy!
15.07.2024
 VoroneTZ
WoL
3.07.2024
 Darthman
Привет выжившие
21.05.2024
 GeePee
185 - RPG
9.02.2024
 Vaskrol
В каком банке открыт…
24.01.2024
 Darthman
185 - ?
30.12.2023
 Mefistofel
Сейчас на сайте
Гостей: 3


Пользователей: 1,790
новичок: Durved
Обсуждение «Анимация»
Cocucka
Avatar пользователя

Опубликовано 08.02.2011 16:37 (14 лет назад)    #
Доброго времени суток! =)
Помогите плз, как сделать анимацию с использованием готовой маски(пока так). Я не знаком с Буффером,к моему сожалению. Вот ,что нашел чтобы просто использовать маску т.е. то что я знаю на счет этого.
var
Form1: TForm1;
Wizard,// Спрайт
WizardMask,// Маска спрайта
Buffer,// Буфер
Flur:Tbitmap;// фоновый рисунок
WizardX,WizardY:integer; // начальные координаты волшебника

procedure TForm1.FormCreate(Sender: TObject);
begin
Wizard:=Tbitmap.Create;
Wizard.Loadfromfile('1картинка.bmp');
WizardMask:=Tbitmap.Create;
WizardMask.Loadfromfile('2картинка.bmp');
Flur:=Tbitmap.Create;
Flur.Loadfromfile('flur.bmp');
Buffer:=Tbitmap.Create;
Buffer.Height:=320; // у буфера нужно задать размер
Buffer.Width:=320;
WizardX:=135;
WizardY:=135;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
// Копируем подложку
BitBlt(Buffer.Canvas.Handle,0,0,320,320,Flur.Canvas.Handle,0,0,SRCCOPY);
// Копируем маску
BitBlt(Buffer.Canvas.Handle,WizardX,WizardY,57,57, WizardMask.Canvas.Handle,0,0,SrcPaint);
// Копируем спрайт
BitBlt(Buffer.Canvas.Handle,WizardX,WizardY,57,57, Wizard.Canvas.Handle,0,0,SrcAnd);
// Копируем буфер на экран
BitBlt(Form1.Canvas.Handle,0,0,320,320,Buffer.Canvas.Handle,0,0,SRCCOPY);
end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
WizardX:=X-28; WizardY:=Y-28;
end;

редакция от Cocucka, 08.02.2011 16:38

Bullet Heaven:Не участвую.
Shirson
Avatar пользователя

Опубликовано 08.02.2011 23:44 (14 лет назад)    #
Использование маски с какой целью требуется?
Bullet Heaven:Не участвую.
Cocucka
Avatar пользователя

Опубликовано 09.02.2011 04:56 (14 лет назад)    #
Ну прозрачность некоторых областей картинки.
Bullet Heaven:Не участвую.
Romikon
Avatar пользователя

Опубликовано 09.02.2011 19:57 (14 лет назад)    #
Я вообще проблемы не понимаю, анимация это же просто. Главное знать размеры одного кадра анимации и при рисовании выводить не всё изображение, а только лишь его часть.
Bullet Heaven:Не участвую.
Shirson
Avatar пользователя

Опубликовано 10.02.2011 04:07 (14 лет назад)    #
SoRDeLKa написал:
Ну прозрачность некоторых областей картинки.

Что мешает этого можно добиться используя прозрачность на самой картинке? Т.е. те области, которые должны быть прозрачными, рисовать определённым цветом и назначать его как прозрачный.
Bullet Heaven:Не участвую.
Cocucka
Avatar пользователя

Опубликовано 10.02.2011 10:33 (14 лет назад)    #
назначать его как прозрачный

Вот, как это сделать?
Bullet Heaven:Не участвую.
Darthman
Древний организм
Avatar пользователя

Опубликовано 10.02.2011 11:10 (14 лет назад)    #
maskblt?
Bullet Heaven:Не участвую.
Перейти на форум:
Конкурсы
Открытые конкурсы:
Bullet Heaven
Подведение результатов...

Старт: 23 ноября 2024г.
Финиш: 9 декабря 2024г.

Участники: 3
Недавние конкурсы:
 186 - Strategy
 185 - RPG XII
 184 - Arcade II
 183 - Novel
 182 - RPG XI
 Все конкурсы
Случайная игра
Мини-чат
Вам необходимо залогиниться.

Архив чата

26,448,994 уникальных посетителей

Создано на базе русской версии PHP-Fusion copyright © 2003-2006 by Nick Jones.
Released as free software under the terms of the GNU/GPL license.