gif in Delphi 2006

[Davidlocke13]

So habe mal was rum gebastelt !

Ergebnis:

Code:

uses
  GIFImage,...
...
...
procedure TForm1.FormCreate(Sender: TObject);

begin  
  Image1.Picture.LoadFromFile('Nyancat.gif'); // Bild laden
end;