Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.23;
Скачать: CL | DM;

Вниз

Как сделать AniGIF   Найти похожие ветки 

 
Друмлин   (2002-05-21 09:05) [0]

Как мне из ряда картинок собрать анимированный гиф? Спасибо!


 
Evgeny ©   (2002-05-23 05:35) [1]

Используя библиотеку RXLib - это делается очень просто.

var
FImage : TGIFImage;
Pic : TPicture;

begin
FImage := TGIFImage.Create;
FImage.Looping := True; // крутить в цикле
Pic := TPicture.Create;

FImage.LoadFromFile(1 фрейм); // загрузим 1 кадр
FImage.Frames[0].AnimateInterval := 2000; // время задержки

Pic.LoadFromFile(2 фрейм); // загрузим 2 (и след. кадры)
FImage.AddFrame(Pic.Graphic);
FImage.Frames[1].AnimateInterval := 1000;
FImage.Frames[1].Origin := Point(7, 19); // позиция кадра

FImage.EncodeAllFrames; // превратить в единый файл
FImage.SaveToFile(полное имя); // сохранить
FImage.Free;
Pic.Free;
end.



Страницы: 1 вся ветка

Текущий архив: 2002.09.23;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.024 c
1-73637
Itap
2002-09-12 14:57
2002.09.23
Сортировка


4-73936
Eugene_Jek_Efimochkin
2002-08-06 22:39
2002.09.23
?? запуск приложения с ожиданием ??


1-73596
carmen
2002-09-12 00:47
2002.09.23
Нужна библ. для работы с эл.таблицами (без установк Excel)


8-73775
Cybermonk
2002-05-23 16:58
2002.09.23
Народ кто знает


1-73598
AlexNO
2002-09-12 09:40
2002.09.23
Региональные стандарты