GIF in TImage

[qb-tim]

Ich hab das übersehen

So löse ich das Problem:

Delphi-Quellcode:

uses {...} GifImage

procedure TForm1.FormActivate(Sender: TObject);
begin
 Image1.Picture.LoadFromFile('C:\irgernd_ein_gif.gif');
end;