图片另存为的问题，请指点！TKS！

[sunriseknits]

通过查询，显示出所需的图片，想把图片另存为下来。
不知用什么方法，请高手们指点一二，TKS！

[gzmhero]

从哪里查询出来图片？数据库？什么格式图片？..........

[sunriseknits]

从数据库查询出来。BMP，JPEG的都有。

[gzmhero]

var
bsTemp:TADOBlobstream;
jpg:tjpegimage;
begin
bsTemp := TADOBlobstream.Create(Adoquery1pic, bmRead);
try
bsTemp.Position:=0;
jpg:=TJpegImage.Create;
jpg.LoadFromStream(bsTemp);
Image1.Picture.Graphic:=jpg;
jpg.Free;
end;
finally
bsTemp.Free
end;

保存：
Image1.Picture.SaveToFile(。。。

[sunriseknits]

问题是想启用TSaveDialog控件将已查询好的图片以JPEG或BMP格式保存到桌面。

[gzmhero]

SaveDialog1.Execute;
Image1.Picture.SaveToFile(SaveDialog1.FileName);