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

Question

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

Answer 1

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

Answer 2

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(

Answer 3

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

Answer 4

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