gif-анимация

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Wolan
Начинающий
Начинающий
 
Сообщения: 6
Зарегистрирован: 01.03.2004 (Пн) 11:47

gif-анимация

Сообщение Wolan » 01.03.2004 (Пн) 13:23

Как вставить на форму gif-анимацию? Нужен отлаженный пример для разбора. :cry:

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 01.03.2004 (Пн) 14:16

Вот держи. Сам искал ЦЕЛЫЙ месяц.
Вложения
AniGif.zip
(5.04 Кб) Скачиваний: 247
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

Wolan
Начинающий
Начинающий
 
Сообщения: 6
Зарегистрирован: 01.03.2004 (Пн) 11:47

Сообщение Wolan » 01.03.2004 (Пн) 15:25

Спасибо, родной. Век не забуду. :lol:

Ramzes
Скромный человек
Скромный человек
Аватара пользователя
 
Сообщения: 5004
Зарегистрирован: 12.04.2003 (Сб) 11:59
Откуда: Из гробницы :)

Сообщение Ramzes » 19.03.2004 (Пт) 21:01

Этим контролом пользуюсь уже давно. Но глючит он немного, моргает!
и вообще просто интерсно узнать как проигрывать эту анимацыю вручную буз контролов???? :D

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 20.03.2004 (Сб) 10:12

Прочитать описалово формата gif, ручками прочитать его, загнать в imagelist и битблтить.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Ramzes
Скромный человек
Скромный человек
Аватара пользователя
 
Сообщения: 5004
Зарегистрирован: 12.04.2003 (Сб) 11:59
Откуда: Из гробницы :)

Сообщение Ramzes » 20.03.2004 (Сб) 13:09

Что у вас все ручками и ручками, а по человечески обїяснить нельзя!!!!! :evil:

SHoK
Начинающий
Начинающий
 
Сообщения: 11
Зарегистрирован: 19.11.2004 (Пт) 23:43

Сообщение SHoK » 26.11.2004 (Пт) 1:16

Sirik писал(а):Вот держи. Сам искал ЦЕЛЫЙ месяц.


сорри за возможно глупый вопрос, но я честно ничего в этом коде не понял
как сделать так, чтобы гиф файл проигрывался не бесконечно, а всего один раз??

Ramzes
Скромный человек
Скромный человек
Аватара пользователя
 
Сообщения: 5004
Зарегистрирован: 12.04.2003 (Сб) 11:59
Откуда: Из гробницы :)

Сообщение Ramzes » 26.11.2004 (Пт) 10:49

В этом контроле есть такое свойство, я уже точно не помню как оно называеться, но точно помню что есть :roll:

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 26.11.2004 (Пт) 16:08

А мой пример - http://mix.web.ur.ru/gif.zip - все видели?
Изображение

xolod
Гуру
Гуру
 
Сообщения: 1162
Зарегистрирован: 15.01.2004 (Чт) 0:42
Откуда: Moscow

Сообщение xolod » 26.11.2004 (Пт) 17:21

Да была же уже тема подобная, "Посрамим Лжемессию" вроде называлась, там и tyomitch пример выкладывал и еще кто-то, даже я, помоему..

Constant ERROR_SUCCESS deprecated. I'm so happy.
Программирование и дизайн – http://www.macrointellect.ru

SHoK
Начинающий
Начинающий
 
Сообщения: 11
Зарегистрирован: 19.11.2004 (Пт) 23:43

Сообщение SHoK » 26.11.2004 (Пт) 22:08

прекрасные примеры, только вот у Тёмыча в рабочей облачти аж 4 файла открывается одновременно...

но я спросил про anigif.zip, имхо тоже неплохой скрипт, вот только гифы проигрывает без остановки, а как сделать так, чтобы он без дыхания замирал на последнем кадре гифа?

я пробовал добавлять туда еще один таймер, который стопарил проигрывание гифа, только гиф на разных компах с разной скоростью проигрывает, а таймер нормально работает :) так что тормозит картинку в разных местах :)

подскажите плиз!!

SHoK
Начинающий
Начинающий
 
Сообщения: 11
Зарегистрирован: 19.11.2004 (Пт) 23:43

Сообщение SHoK » 27.11.2004 (Сб) 1:32

неужели никто не знает?

xolod
Гуру
Гуру
 
Сообщения: 1162
Зарегистрирован: 15.01.2004 (Чт) 0:42
Откуда: Moscow

Сообщение xolod » 27.11.2004 (Сб) 2:39

Ну нельзя же так, ведь предложил поискать тему "Посрамим лжемессию", что лень, да?? :twisted:
Есть ТАМ и остановка и все остальное.. Почитай, полезно читать :idea:

Constant ERROR_SUCCESS deprecated. I'm so happy.
Программирование и дизайн – http://www.macrointellect.ru

SHoK
Начинающий
Начинающий
 
Сообщения: 11
Зарегистрирован: 19.11.2004 (Пт) 23:43

Сообщение SHoK » 28.11.2004 (Вс) 0:43

xolod писал(а):Ну нельзя же так, ведь предложил поискать тему "Посрамим лжемессию", что лень, да?? :twisted:
Есть ТАМ и остановка и все остальное.. Почитай, полезно читать :idea:


извини, наверное невнимательно прочел или просто не понял, где там остановка?

xolod
Гуру
Гуру
 
Сообщения: 1162
Зарегистрирован: 15.01.2004 (Чт) 0:42
Откуда: Moscow

Сообщение xolod » 28.11.2004 (Вс) 1:41

http://bbs.vbstreets.ru/download.php?id=1298
Качал отсюда? В этом контроле есть метод Stop!

Constant ERROR_SUCCESS deprecated. I'm so happy.
Программирование и дизайн – http://www.macrointellect.ru

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 06.03.2005 (Вс) 4:59

Ни кто не подскажет, как сделать анимацию дыух gif файликов в одном приложениии. Что-то у меня не получилось не на основе никакого примера... Один работает нармально, а вот два не хотят...
Спасибо... :D

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 06.03.2005 (Вс) 13:27

Вот мой GIF-проигрыватель, в виде UserControl-а и с демо-примером: две анимации одновременно, с возможностью приостановки и возобновления любой из них.


[edit]приложение перенесено на http://mix.web.ur.ru/GIF.zip [/edit]
Последний раз редактировалось tyomitch 07.03.2005 (Пн) 20:48, всего редактировалось 1 раз.
Изображение

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 06.03.2005 (Вс) 19:45

tyomitch писал(а):Вот мой GIF-проигрыватель, в виде UserControl-а и с демо-примером: две анимации одновременно, с возможностью приостановки и возобновления любой из них.
Пока есть глюки с фоном. Если решишь использовать мой контрол - буду их исправлять, иначе оставлю как есть :-)


Я бы с удовольствием, но где он, я его не вижу...
http://mix.web.ur.ru/gif.zip - это скачал, но там цвет фона меняется, а мне это не нужно, мне нужно два анимированых файлика. Два гифа вывести, а может даже и три...
Если есть возможность, то я буду рад оказанному с вашей стороны содействию...)))

С ув. Moris
Последний раз редактировалось moris 06.03.2005 (Вс) 20:29, всего редактировалось 1 раз.

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 06.03.2005 (Вс) 20:07

moris писал(а):
tyomitch писал(а):Вот мой GIF-проигрыватель, в виде UserControl-а и с демо-примером: две анимации одновременно, с возможностью приостановки и возобновления любой из них.
Пока есть глюки с фоном. Если решишь использовать мой контрол - буду их исправлять, иначе оставлю как есть :-)

Я бы с удовольствием, но где он, я его не вижу...

Из-за глюков форума все аттачи исчезли :shock:
Надеюсь, не безвозвратно.
Если завтра-послезавтра они волшебным образом не вернутся на круги своя, кину тебе мылом...
Изображение

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 06.03.2005 (Вс) 20:28

Спасибо за помощь...)))
Я только - точ написал прогу )))
Все работает...

Но все - равно кидай, хочу посмотреть, может у тя круче...
Сделал два текстовых поля , и все в один таймер запихал .
Все заработало...
Сейчас буду в основную прогу монтировать, надеюсь заработает...
Вот такой код у меня вышел...


Private Sub Timer1_Timer()

If FrameCount < TotalFrames - 1 Then
Image1(FrameCount).Visible = False
Image2(FrameCount).Visible = False
Image1(FrameCount).Visible = False
FrameCount = FrameCount + 1
Image2(FrameCount).Visible = True
Timer1.Interval = CLng(Image2(FrameCount).Tag)
Image1(FrameCount).Visible = True
Timer1.Interval = CLng(Image1(FrameCount).Tag)
Else
FrameCount = 0
For i = 1 To Image1.Count - 1
Image1(i).Visible = False
Next i
FrameCount = 0
For i = 1 To Image2.Count - 1
Image2(i).Visible = False
Next i
Image2(FrameCount).Visible = True
Timer1.Interval = CLng(Image2(FrameCount).Tag)
Image1(FrameCount).Visible = True
Timer1.Interval = CLng(Image1(FrameCount).Tag)

End If
End Sub


Жду все-равно твой пример для сравнения...
Думаю, что есть способи и получше, чем у меня...

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 06.03.2005 (Вс) 23:37

moris писал(а):Спасибо за помощь...)))
Я только - точ написал прогу )))
Все работает...

Но все - равно кидай, хочу посмотреть, может у тя круче...

Надеюсь, у меня круче - посмотри обновление на http://mix.web.ur.ru/GIF.zip

-Произвольное число контролов (правда, когда их много - тормозит :oops:)
-Любой цвет фона, в т.ч. прозрачный
-Приостановка и возобновление, в цикле или один раз
-Ручной разбор GIF-файла, т.е. без привязки к LoadPicture
Изображение

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 07.03.2005 (Пн) 20:17

Да. Спасибо...
Посмотрел
Воистину наварот )))

:D

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 07.03.2005 (Пн) 20:51

moris писал(а):Да. Спасибо...
Посмотрел
Воистину наварот )))

:D

Ну так что, будешь его юзать? ;-)
Изображение

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 08.03.2005 (Вт) 11:57

Да оставлю в этой проге свой, в следующую вставлю ))) :D
Эта прога уже работает и так... Потом может и ее перепишу...
А можно сделать так, что бы он гифники не с диска брал и проигрывал, а они в экзешника хранились? :shock:

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 08.03.2005 (Вт) 12:08

Использовать ресурсы? :?

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 08.03.2005 (Вт) 20:49

Amed писал(а):Использовать ресурсы? :?

Не сканает - в текущем варианте мой контрол читает только с диска.

moris, так сделать можно, но зачем, раз ты уже заюзал свой вариант? :-)
В пустоту писать уже надоело... :-|

[edit]Сделал-таки внедрение в ехе-шник. Надеюсь, теперь Оловянниковский проигрыватель превзойдён по всем параметрам :-)[/edit]
Изображение

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 12.03.2005 (Сб) 10:46

moris, так сделать можно, но зачем, раз ты уже заюзал свой вариант? :-)
В пустоту писать уже надоело... :-|


А я твой вариант юзаю. Очень мне он понравился.
:shock: Так просто все, аж душа радуется - даже думать не надо вообще. Классно написано - я очень рад на самом деле.

Вашей :idea: светлой голове спасибо.
Гифники как кнопочки у меня работают - не знал как сделать там MоuseIcon. Сверху рисунок наложил прозрачный - теперь все работает отлично)))

Еще раз спасибо :)

[edit]Сделал-таки внедрение в ехе-шник. Надеюсь, теперь Оловянниковский проигрыватель превзойдён по всем параметрам :-)[/edit]


А как так получилось? не поделишься секретом?
Последний раз редактировалось moris 12.03.2005 (Сб) 23:27, всего редактировалось 2 раз(а).

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 12.03.2005 (Сб) 16:44

Дык какие же там могут быть секреты - исходник же открытый.
Изображение

moris
Новичок
Новичок
Аватара пользователя
 
Сообщения: 36
Зарегистрирован: 21.01.2005 (Пт) 0:41
Откуда: Питер

Сообщение moris » 12.03.2005 (Сб) 23:24

tyomitch писал(а):Дык какие же там могут быть секреты - исходник же открытый.


Интегрирование в EXE-шник в той версии нет, что я скачал. А сейчас ссылка эта не работает. :(
По-этому и говорю про секрет. :wink:

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 13.03.2005 (Вс) 10:09

moris писал(а):
tyomitch писал(а):Дык какие же там могут быть секреты - исходник же открытый.


Интегрирование в EXE-шник в той версии нет, что я скачал. А сейчас ссылка эта не работает. :(

Работает-работает, и выдаёт такую страницу:
Multiple Choices
The document name you requested (/GIF.zip) could not be found on this server. However, we found documents with names similar to the one you requested.

Available documents:

(common basename)

--------------------------------------------------------------------------------

Apache/1.3.27 Server at mix.web.ur.ru Port 90


Подсказать, куда на ней кликнуть? ;-)
Изображение

След.

Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot, Yandex-бот и гости: 1

    TopList