Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#1: 2009-05-01 22:10:35 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2017-06-17 20:28:58
карма: 0

0
Разработчик
Ответов: 4698
Рейтинг: 426
#2: 2009-05-02 11:47:32 ЛС | профиль | цитата
Насколько я знаю, такой схемы(да и компонента) не существует, в связи с тем, что на GIF еще действует лицензия, следовательно GIF платный, то есть разобрать на картинки можно, а собрать в анимацию нельзя
Но можно сделать анимацию в самой программе на HiAsm:
code_13103.txt
карма: 10
0
файлы: 1code_13103.txt [3.8KB] [244]
Ответов: 3514
Рейтинг: 184
#3: 2009-05-02 12:54:24 ЛС | профиль | цитата
Ничего на GIF уже не действует..
карма: 0
0
Разработчик
Ответов: 4698
Рейтинг: 426
#4: 2009-05-02 12:59:41 ЛС | профиль | цитата
Тогда что мешает сделать функцию "создать GIF из Bitmap-картинок"?(кроме траты времени)
карма: 10
0
Ответов: 3514
Рейтинг: 184
#5: 2009-05-02 13:14:04 ЛС | профиль | цитата
Ничего не мешает
карма: 0
0
Ответов: 1161
Рейтинг: 160
#6: 2009-05-02 17:52:39 ЛС | профиль | цитата
Assasin, Kol сам писать будешь?
карма: 0

0
Администрация
Ответов: 15295
Рейтинг: 1519
#7: 2009-05-03 12:23:29 ЛС | профиль | цитата
Assasin писал(а):
(кроме траты времени)

маленькое такое незначительное но...
карма: 27
0
Разработчик
Ответов: 4698
Рейтинг: 426
#8: 2009-05-04 13:39:41 ЛС | профиль | цитата
LainX писал(а):
Kol сам писать будешь?

Да вот, пожалуйста( ):
procedure СОЗДАТЬ GIF begin
Собрать GIF из картинок
end
Что-нибудь понял? Нет? Вот и я нет! Мне такие задачи(с требованием знания языка программирования) лучше не поручать, ведь в программировании я круглый ноль без палочки!.. Хотя нет, с палочкой. Вот мой шедевр:
-*~~~MyScriptInDelphi~~~*-
procedure My() begin
if i>2 then
i=0
endif
end

------------ Дoбавленo в 13.40:
Dilma писал(а):
маленькое такое незначительное но... ;)

Совершенно верно!
карма: 10
0
8
Сообщение
...
Прикрепленные файлы
(файлы не залиты)