[volod3000]

Добрый день.

Возможно ли чтение из ресурса в Image, анимированый Gif.

Пробую так :

Код:

var
 ResStream: TResourceStream;
 GIF: TGifImage;
begin
 ResStream := TResourceStream.Create(HInstance, 'imggif', 'RES');

 GIF:=TGifImage.Create;
       GIF.LoadFromStream(ResStream);
       Image1.Picture := nil;
       Image1.Picture.Bitmap.Assign(GIF);
       GIF.Free;
       ResStream.Free;
end;

Но получаю статистическую картинку.

Ресурс делаю с помощью brcc32.exe

[ChinYan]

А разве в Image вообще можно GIF поставить?

[volod3000]

Сообщение от ChinYan

А разве в Image вообще можно GIF поставить?

Без проблем, с помощью маленького компонента gif (Анимированный Gif в компоненте Image).

[angvelem]

Сообщение от volod3000

Без проблем, с помощью маленького компонента gif.

Насколько я помню

Код:

Image1.Picture.Bitmap.Assign(GIF);

присвоит только первый кадр, в не зависимости от крутости применяемых компонентов. Ну нельзя битмапу присвоить анимацию.

[volod3000]

Сообщение от angvelem

Насколько я помню

Код:

Image1.Picture.Bitmap.Assign(GIF);

присвоит только первый кадр, в не зависимости от крутости применяемых компонентов. Ну нельзя битмапу присвоить анимацию.

Вот проект, внутри папка Gif (TGifImage) .
Справа файлы выгружаются на диск, слева, из ресурса.

картинка из ресурса.rar

P.S. У меня Delphi XE

[angvelem]

Сообщение от volod3000

Вот проект...

Смешно:
Вы не авторизованы на форуме или не имеете доступа к этой странице. Это могло произойти по одной из нескольких причин: