图片另存为的问题,请指点!TKS!

sunriseknits 2008-05-19 03:59:20
通过查询,显示出所需的图片,想把图片另存为下来。
不知用什么方法,请高手们指点一二,TKS!
...全文
52 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
gzmhero 2008-05-19

SaveDialog1.Execute;
Image1.Picture.SaveToFile(SaveDialog1.FileName);
回复
sunriseknits 2008-05-19
问题是想启用TSaveDialog控件将已查询好的图片以JPEG或BMP格式保存到桌面。
回复
gzmhero 2008-05-19
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 2008-05-19
从数据库查询出来。BMP,JPEG的都有。
回复
gzmhero 2008-05-19
从哪里查询出来图片?数据库?什么格式图片?..........
回复
相关推荐
发帖
Delphi
创建于2007-08-02

4895

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2008-05-19 03:59
社区公告
暂无公告