TGifImage wird nicht angezeigt

[Illusion]

Heidiho

Ich komm absolut nicht mit der GifImage.pas zurecht. Hab die hier gefundene Unit eingebunden und versucht folgendermassen ein animiertes Gif anzuzeigen:

Delphi-Quellcode:

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

Kompilieren kein Problem, aber zu sehen bekomme ich ein leeres Form. Das OnActivate-Ereigniss hab ich gewählt da es in einen anderen Thread wohl funktioniert hat. Kann mir jemand einen Hinweis geben wo da der Fehler liegt?

[mkinzler]

Für animierte Gifs ist ein TImage (mit Gif-Filter) die falsche Fahl. Dafür eignet sich die Komponente aus der JVCL.

[DeddyH]

Oder bei Verwendung der Unit GifImage das Konvertieren in eine Bitmap, die dann in das TImage geladen werden kann. Aber ich meine auch, das hätte früher schon ohne explizite Konvertierung funktioniert.

//Edit: Sorry, ich hatte überlesen, dass es sich um eine animierte Gif handelt.

[Klaus01]

Die Unit TGifImage sollte auch animierte Bilder zeigen können.
Für den privat Gebrauch ist die Unit kostenlos.

Schönen Abend noch.
Klaus

[Illusion]

Danke für eure Antworten!

Also sollte das animierte Gif noch korrekt dargestellt werde obwohl es in eine BMP konvertiert wurde? Muss sagen das würde mich schon sehr wundern.

Die JVCL hab ich mir bisher noch nicht gezogen da das Komponenten-Package schon recht umfangreich ist und ich mich immer mit meiner Downloadvolumen-Begrenzung herumschlagen muss. Werds mir aber wohl doch leisten müssen.

so long

[DeddyH]

Hast Du meinen Edit nicht gelesen?

[Illusion]

Entschuldige, hatte ich tatsächlich überlesen.

Aber laut Klaus01 ist es doch möglich das Gif anzuzeigen mit der von mir verwendeten Unit?

[Robert Marquardt]

Ein Internet-Cafe und ein USB-Strick sollten das Problem loesen.
Es empfiehlt sich gleich JCL und JVCL von http://jcl.sf.net/daily bzw. http://jvcl.sf.net/daily zu ziehen. Frisch aus unserem Subversion-Repository.