图像存取

gwenz 2000-05-17 10:19:00
往申SQLSERVER存取图像文件。JPEG BMP 。详细原程序。
...全文
188 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
kxy 2000-05-18
  • 打赏
  • 举报
回复
最后一行没有:)
kxy 2000-05-18
  • 打赏
  • 举报
回复
我的OICQ用不了了:(
你干吗非用TDBImage,用Image吧
...
query1.Open;
Tblobstream(Tblobfild(query1.fieldbyname('image')).SaveToStream(mystm);
Image1.LoadFromStream(mystm);
Image1.Load
gwenz 2000-05-18
  • 打赏
  • 举报
回复
在uses中加jpeg就可以。kxy你有oicq吗?我们可以联系一下。我的是5658378
kxy 2000-05-18
  • 打赏
  • 举报
回复
DBImage是TDBImage吗,它可以直接显示Jpeg吗?
gwenz 2000-05-18
  • 打赏
  • 举报
回复
var stm:tblobstream; myjpeg:jpeg;
query1.sql.add(select * from image);
query1.open;
mystm:=Tblobstream(Tblobfild(query1.fieldbyname('image')),bmread);
myjpeg:=loadfromstream(mystm);
dbimage.assing(myjpeg);
这样有什么问题吗?
kxy 2000-05-18
  • 打赏
  • 举报
回复
什么问题,请详细一些.
gwenz 2000-05-18
  • 打赏
  • 举报
回复
我也知道用流作,但从数据库去数据的时候有问题。
有谁能给点原程序吗?
monday 2000-05-17
  • 打赏
  • 举报
回复
我也想知道
jll 2000-05-17
  • 打赏
  • 举报
回复
同意kxy,如果需要分开保存的话还可以只记录文件名
kxy 2000-05-17
  • 打赏
  • 举报
回复
把图象当作一般的文件,读入到一个流中,就可以了
看看TBlobField的帮助,他有loadfromStream,saveToStream
LoadFromFile,SaveToFile

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧