Problem mit JPG-Datei

[Pytho]

Ich hab ein Programm geschrieben das aus einem Computerspiel (Warcraft III) die Bilddateien auslesen können soll, solche Programme gibt es zwar schon zuhauf, aber naja, auf jeden Fall ist bei mir da ein komisches Problem aufgetreten. Ich konnte die Datei schon extrahieren (man muss dazu nur die richtigen Teile der Datei auslesen und wieder zusammensetzten) und auf der Festplatte als Jpeg speichern, allerdings ist scheinbar ein Fehler drinnen, der es z.B. Delphi unmöglich macht das Bild zu verwenden. Im Windows-Explorer, Paint, und einem anderen Grafikprogramm wird das Bild ohne Probleme angezeigt, in Delphi und auch im Firefox wird nur ein Fehler angezeigt. (Wenn ich Versuche die Datei mit Delphi in ein bmp umzuwandeln erhalte ich eine Zugriffsverletzungs Meldung, aber auch wenn ich der Image Komponente im Objekteditor das Bild zuweisen will erhalte ich einen Fehler).
Meine Frage jetzt: was könnte das sein, irgendeine Anweisung die Delphi/Firefox braucht, oder nicht versteht?
Hat da jemand eine Idee?

[DGL-luke]

Hallo,

du könntest versuchen das ganze über GDI+ zu laden. gibt bei torry ne lib mit hadern/wrappern.

EDIT: Hier, das müssts sein.

[Pytho]

Etwas umständlicher als erhofft, aber ich hab es hinbekommen und es geht, vielen Dank :)

[DGL-luke]

Gut zu hören. KÖnntest du vielleicht deine Lösung kurz posten, damit jemand, der nach sowas sucht, es gleich findet?

[Pytho]

Hmm, also das sieht jetzt so aus:

Delphi-Quellcode:

uses GDIPAPI,GDIPOBJ,ActiveX;
procedure DrawJPG(
jpgStr: TStream; //Enthält den Code des JPG-Bildes
CaV: TCanvas //Darauf will ich zeichnen
);
var
graphics: TGPGraphics;
image: TGPImage;
istr: IStream;
begin
  graphics:=TGPGraphics.create(CaV.Handle);
  jpg_str.Seek(0,soFromBeginning);
  istr:=TStreamAdapter.Create(jpg_str) as IStream;
  image:=TGPImage.Create(istr);
  graphics.DrawImage(image,0,0);
  graphics.Free;
  image.Free;
  jpg_str.free;
end;