Einzelnen Beitrag anzeigen

Ghostleader

Registriert seit: 22. Aug 2009
Ort: Hilden
116 Beiträge
 
Delphi 2010 Professional
 
#1

GIF-Animtion mit TImage anzeigen?!

  Alt 29. Sep 2010, 20:35
Delphi-Version: 2010
Hey.
Ich möchte eine Gif-Animation anzeigen. Das geht aber per "Image1.Picture.LoadFromFile" nicht, weil die Datei sich nicht abspielt, sondern als Standbild erscheint...
2 Ideen:
1.)
Ich versuce mit einem Timer 6 Bitmaps nacheinander anzuzeigen.
Zitat:
Image1.Picture.LoadFromFile('C:\Pictures\fig1_0.bm p');
Image1.Picture.LoadFromFile('C:\Pictures\fig1_1.bm p');
...
2.)
Ich benutze eine Schleife...:
Zitat:
for i := x to 6 do
begin
Image1.Picture.LoadFromFile('C:\Pictures\fig1_' + IntToStr(i) + '.bmp');
x := x +1;
end;
Der Prozess läuft bei beiden Möglichkeiten natürlich so schnell ab, dass immer nur das letzte Bild angezeigt wird. Hat jemand eine Idee wie man das hinauszögern kann? So das jedes Bild einzelnd angezeigt wird, ohne dass es eine realistische Geschwindigkeit verliert (Das Bild soll nicht stocken, oder haken.)
Mfg Ghost
Michael

Geändert von Ghostleader (29. Sep 2010 um 20:43 Uhr)
  Mit Zitat antworten Zitat