JPEG in TImage laden

[ilse2005]

Hallo habe schon viel rumgesucht aber leider keine Lösung gefunden. Ich habe in meiner Datenbank JPEG Bilder als Blob gespeichert. Das schreiben über Delphi funktioniert auch schon. Nun will ich aber die Bilder auch anzeigen lassen und habe folgendes versucht:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
   blob : TMemoryStream;
   BlobField: TBlobField;
   jpeg : TJPEGImage;
   bmp : TBitmap;
begin
    blob :=  TMemoryStream.Create();
    jpeg := TJPEGImage.Create;
//    bmp := TBitmap.Create;
   with ADOTable1 do
   begin
     blob.Clear;

     try
     begin
       BlobField := FieldByName('Bild') as TBlobField   ;
       blobfield.SaveToStream(blob);
       jpeg.LoadFromStream(blob);
//     bmp.Assign(jpeg);
       Image1.Picture.Assign(jpeg);
     end;
     finally 
       blob.free;
       jpeg.free
   end;

end;

Das Programm kompillert auch aber wenn ich den Button klicke kommt immer folgende Fehlermeldung: 'JPEG-Fehler#42'

EDIT: Besser so? Hab das Problem leider immer noch...