zur Startseite Infos für Behinderte Behindertensoftware Forum Programmierarchiv
Webguide Markus privat Kontakt Download Gästebuch
Online Games Entstehungsgeschichte

Wie speichere ich JPEG-Grafiken als Ressource in meinem Projekt?

Da JPEG-Grafiken im Gegensatz zu Bitmaps um einiges weniger Speicherplatz benötigen, ist es sinnvoll Grafiken in seinem Projekt im JPEG-Format abzuspeichern. Zuerst legt man eine Ressourcen-Datei an, indem man sich dem Windows-Notepad bedient und eine Datei (*.rc) anlegt. Hier kann man nun seine JPEG-Grafiken angeben:

200 RCDATA "Grafik00.jpg"
201 RCDATA "Grafik01.jpg"
usw.

Nun öffnet man eine DOS-Box oder geht in den Dialog "Ausführen". Dort wird der Ressourcen-Compiler von Borland aufgerufen:

z.B.: C:\Programme\Borland\Delphi4\Bin\brc32.exe Grafiken.rc

Nun wird eine RES-Datei daraus erzeugt, die in Delphi einfach eingebunden wird, indem man unter der USES-Anweisung folgende Compileranweisung eingibt:

{$R Grafik.res}

Der Aufruf solcher Ressourcen weicht etwas von der gewohnten funktion LoadFromFile des TImage-Objekts ab. Es soll z.B. eine JPEG-Grafik zu Beginn des Programms geladen werden:

procedure TForm1.FormCreate(Sender: TObject);
var
JpegResStream: TResourceStream;
begin
JpegResStream := TResourceStream.CreateFromID(HInstance, 200, RT_RCDATA);
 Image1.Picture.Graphic := TJPEGImage.Create;
 with TJPEGImage(Image1.Picture.Graphic) do
 begin
 {hier können Eigenschaften des TJPEGImage-Objekts stehen z.B. PixelFormat, Greyscale usw.}
 end;
 Image1.Picture.Graphic.LoadFromStream(JpegResStream);
 JpegResStream.Free;
 end;

Anmerkung: So kann auch mit anderen Ressourcen verfahren werden, wie z.B. WAV-Dateien oder RTF-Dateien.


zurück zum Stichwortverzeichnis