![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
анимированный 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, наконец. %-)