Анимация в Delphi

Рейтинг: 0Ответов: 1Опубликовано: 09.05.2011

Требуется сделать светящиеся маяки. Анимационные Маяки сделаны в gif, но Delphi не поддерживает его, скачал я библиотеку JEDI, начал поддерживать, но отображается только первый кадр, я не знаю как сделать анимацию. Был вариант в AVI перевести, но то что вычитал из учебника, не сработало, сейчас пытаюсь понять в чём проблема.
Но вспомнил про замечательный Flash, и вроде библиотек хватает, но не знаю какую простую выбрать для отображения анимации flv, и как потом её установить и реализовать. Направьте, пожалуйста!

delphi анимация
Источник: Stack Overflow на русском

Ответы

▲ 1

Не занимайтесь дурью, разбейте разложите gif в bmp и двигайте его.

разместите компонент image(где вам там надо) с размерами одного кадра, загрузите в него ленту (bmp). Добавляем таймер и пишем в него код:

with image do
begin
Left:=Left-Width div [количество кадров];
if Left=-Width then Left:=0;
end;