У меня RAD Studio C++ Builder XE, ставлю компонент Image туда запихиваю файл gif, но когда запускаю проект, GIF отображается как картинка, а не анимация, почему так происходит, и встречался ли кто нибудь с подобным???

(читать всё…)

Ставлю компонент Image, туда запихиваю файл gif, но когда запускаю проект, GIF отображается как картинка, а не анимация, почему так происходит, и встречался ли кто нибудь с подобным???

(читать всё…)

отображать в image1 (читать всё…)

Gif-файл из ресурса, Анимированый Gif

Скачать

Есть небольшие задумки по одному проекту, но у меня проблема с реализацией графики. Всё уже отрисованно, но вся анимация в формате gif. Можно, не конвертировать все в bmp, а использовать сразу?

В RxGif (вроде такое название) при смене гифки, картинка становиться очень странной. К тому же иногда проскакивают мигания (у меня 3-4 слоя gif одновременно, с включённой прозрачностью.) (читать всё…)

Где взять компонент который воспроизводит GIF АНИМАЦИЮ? (читать всё…)

Есть модуль от Андерса Меландера, бесплатный. Подключаете его в секцию uses и пишете код:

procedure Tform1.FormCreate(Sender : Tobject);
var
gif : TGifImage;
begin
gif:=TGIfImage.Create;
try
Image1.Picture.LoadFromFile('1.gif);
finally
gif.Free;
end;
end;

А вот собственно сам модуль

Вложения

GIFImage.rar (53.6 Кб)

Тема на форуме.

uses
   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs, GifImg, ExtCtrls;

type
   TForm30 = class(TForm)
     Image1: TImage;
     Timer1: TTimer;
     procedure Timer1Timer(Sender: TObject);
     procedure FormCreate(Sender: TObject);
   private
     Gif: TGifImage;
   public
     { Public declarations }
   end;

var
   Form30: TForm30;

implementation

{$R *.dfm}

procedure TForm30.FormCreate(Sender: TObject);
begin
   Gif := TGifImage.Create;
   Gif.LoadFromFile(’C:\Xom04.gif’);
   Gif.Animate := True;
   Gif.AnimateLoop := glEnabled;
end;

procedure TForm30.Timer1Timer(Sender: TObject);
begin
   Image1.Picture.Assign(Gif);
end;

end.

Тема на форуме