JPEG-Bilder in einem Formular anzeigen.

[Rasmus Weigel]

Hallo!

Ich möchte mit Delphi 3 ein JPEG-Bild in einem Formular darstellen. Leider wird dieses Bildformat nicht von der Image-Box unterstützt.
Weiß jemand hilfe

Danke
Rassi

[Andreas Kosch]

Hallo,

auf der Delphi-CDROM befindet sich die Unit <b>JPEG.PAS</b>. Wenn diese Unit in das eigene Projekt eingebunden wird, können die VCL-Komponenten auch mit JPEG-Grafiken umgehen. Die alles entscheidende Stelle verbirgt sich bei dieser Unit hinter den folgenden Zeilen:
<pre>
initialization
InitDefaults;
TPicture.RegisterFileFormat('jpeg', sJPEGImageFile, TJPEGImage);
TPicture.RegisterFileFormat('jpg', sJPEGImageFile, TJPEGImage);
finalization
TPicture.UnregisterGraphicClass(TJPEGImage);
end.
</pre>
Im <b>Initialization</b>-Abschnitt wird das JPEG-Format unter Delphi registriert.

P.S: Ich bin aber zu faul um nachzusehen, ob diese Unit bereits bei Delphi 3 dabei war ;-)
&#10

[Rasmus Weigel]

Hallo!

Vielen Dank für den Tip.
Ich werde gleich mal nachsehen, ob ich die Unit auf der Delphi3 CD finde.

Gruß
rass

[Andy Stricker]

Ja, sogar unter Delphi 3.0 Standart: \INFO\EXTRAS\JPEG\jpeg.pas

And