JPEG in BLOB Feld speichern

[Fritz01]

Hallo,
da habe ich wieder ein Problem. Es sollen bmp und/oder jpeg Bilder in einem BlobFeld gespeichert werden.
Bei bmp mache ich das so, und das funktioniert auch.

Delphi-Quellcode:

procedure TForm1.ReadButtonClick(Sender: TObject);
begin
  with Table1 do
  Image1.Picture.Assign(FieldByName('Bild'));
end;

procedure TForm1.WriteButtonClick(Sender: TObject);
begin
 with Table1 do
  begin
   table1.Insert;
   table1.FieldByName('bild').Assign(Image1.Picture);
   table1.Post;
 end;
end;

Nun habe ich die bei USES jpeg eingefügt.
Wie geht das mit jpeg Bildern?
Fritz01

[edit=SirThornberry]Delphi-Tags ergänzt - Mfg, SirThornberry[/edit]