Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

анимированный gif в delphi [D7, Win2k]


angelika ©   (2006-08-26 18:47:00) 

Скажите пожалуйста как можно отобразить анимированный gif в delphi, т.к Timage не поддерживает анимированные картинки.
Анимированный gif который я хочу отобразить.
http://img175.imageshack.us/my.php?image=3dsmiles011dt2.gif


Handle   (2006-08-26 18:59:00) [1]

Насчёт анимации не знаю, а вот gif отобразить пожалуйста.

var
 OleGraphic: TOleGraphic;
 fs: TFileStream;
begin
 try
   OleGraphic := TOleGraphic.Create;
   fs := TFileStream.Create('C:\3dsmiles011dt2.gif', fmOpenRead or fmSharedenyNone);
   OleGraphic.LoadFromStream(fs);
   Image1.Picture.Assign(OleGraphic);
 finally
   fs.Free;
   OleGraphic.Free
 end;


Ketmar   (2006-08-26 18:54:00) [2]

TGifImage, например. RxLib, опять же... TWebBrowser, наконец. %-)


Наверх

Титульная страница Поиск, карта сайта Написать письмо