On-line: PSP, гостей 1. Всего: 2 [подробнее..]
АвторСообщение
администратор




Пост N: 4683
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.04.15 16:00. Заголовок: Анимированный GIF


Можно ли вывести средствами Windows , и что бы анимация была ?

Похоже можно но в Сях не силен.
_https://msdn.microsoft.com/en-us/library/system.drawing.imageanimator.animate%28v=vs.110%29.aspx

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 4 [только новые]


администратор




Пост N: 536
Зарегистрирован: 20.02.11
ссылка на сообщение  Отправлено: 06.04.15 16:09. Заголовок: а мож так core\..


а мож так

core\contrib\hbgd\tests\animgif.prg

PS это похоже создает такой гиф а не кажет его ((
в минигуи есть точно

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4684
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.04.15 16:18. Заголовок: Да ну на фик этот HB..


Да ну на фик этот HBGD
А вот в Минигуи да есть и я уже знаю как сделать под GTWVT.


Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4685
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 06.04.15 21:45. Заголовок: Первый блин комом ка..


Первый блин комом как обычно ;)

Вот такой тест сделал.
 
ret:=.f.
Agif:=Directory("*.gif")
ss:=SaveScreen(1,36,5,44) // всего 40 файлов , фреймы извлеченные из анимированного Gif
// каждый не более 10 кило весом.
do while !ret
FOR EACH File IN Agif
Wvt_DrawImage(1, 36,5, 44,File[1])
if inkey(0.05)==27 // задержка нужна
ret:=.t.
exit
endif
RestScreen(1,36,5,44,ss) // коментю эту строку и ни чего не дергается (не моргает)
// но остается старое изображение
NEXT
enddo



Возможно RestScreen шибко медленный или у меня лыжи не едут.
Не пойму куда копать.

Спасибо: 0 
ПрофильЦитата Ответить
администратор




Пост N: 4687
Зарегистрирован: 17.05.05
ссылка на сообщение  Отправлено: 07.04.15 16:27. Заголовок: Собственно все получ..


Собственно все получилось.
_https://cloud.mail.ru/public/860ec0289f31/07.04.2015%2016-24-09.avi

В программе все плавнее работает и ни чего не мерцает , видео дернул
с помощью Snagit

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 189
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет