Es ist nicht nötig, mehrere Bilder zu laden und sich daraus eine Animation zu basteln.
Ab Delphi 2007 wurde TGIFImage in Delphi integriert. Damit kann man ein animiertes GIF einfach in ein TImage laden und dieses wird automatisch abgespielt.
Dazu sind folgende Schritte nötig:
Delphi-Quellcode:
uses {...} GIFImg; // Ermöglicht einem TImage das Abspielen von GIFs
procedure TForm1.FormCreate(Sender: TObject);
begin
GIFImageDefaultAnimate := True; // Animation aktivieren
Image1.Picture.LoadFromFile('C:meineAnimation.gif'); // Bild laden
end;
Weitere Informationen und ein hilfreiches FAQ findet man
auf dieser Seite.