如何用DBIMAGE保存JPG图片？(100分)

我用DELPHI3，数据库用SQL SERVER7.0，用DBE对数据库进行设置，曾改为BOLB SIZE 由原
来的改为1024现有问题如下：
1、我用IMAGE字段来保存图片，用DBIMAG对字段进行处理，只能保存BMP图
片，JPG图片DBIMAGE可以显示，但按保存时，图片消失，保存失败。

这个我也想啊
不过 bde+delphi 不支持阿

uses Jpeg;

var
MyBitMap:TBitMap;
MyJpg:TJpegImage;
TempStream:TMemoryStream;
begin
MyBitmap:=Tbitmap.Create;
try
MyJpg:=TJpegImage.Create;
try
TempStream:=TMemoryStream.Create;
try
DBImage1.Picture.Graphic.SaveToStream(TempStream);
TempStream.Seek(0,0);
MyJpg.LoadFromStream(TempStream);
MyBitMap.Assign(MyJpg);
MyBitmap.HandleType:=bmDIB;
MyBitmap.SaveToFile('F:/xxxx.bmp');
finally
TempStream.Free;
end;
finally
MyJpg.Free;
end;
finally
MyBitmap.Free;
end;
end;

接受答案了.