要失业了!各位大虾,数据库中的Blob怎样显示出来,并且能修改保存。急,急,急!!!(100分)

  • 主题发起人 主题发起人 brokenbridge
  • 开始时间 开始时间
B

brokenbridge

Unregistered / Unconfirmed
GUEST, unregistred user!
现在我要建这样一个数据库系统,其中的一个字段是CAD图形,我想通过编程来实现这个字
段的维护。请问怎样用实现!感激涕零!
 
1. BlobField.SaveToFile存入文件
2. 创建一个OleContainer,然后“由文件创建”OLE对象,指定1输出的文件名,并选中“链接”
(没有用过CAD,想来应该是有OLE服务器功能的)
3. 图形应该显示出来了,双击应能打开CAD编辑
4. 如果修改了,BlobField.LoadFromFile从文件装入
 
龙丹:
先谢。不过好象不行,出错了。Invalid Stream Format!
 
怎么写如数据库的
 
procedure TDemoMainForm.Button13Click(Sender: TObject);//从文件装入
begin
Table2.Edit;
TBlobField(Table2.FieldByName('照片')).LoadFromFile('C:/TEMP/TEMP.BMP');
Table2.Post;
end;
procedure TDemoMainForm.Button14Click(Sender: TObject);//存入文件
begin
TBlobField(Table2.FieldByName('照片')).SaveToFile('C:/TEMP/TEMP.BMP');
end;
procedure TDemoMainForm.Button15Click(Sender: TObject); //创建连接并显示
begin
OleContainer1.CreateLinkToFile('C:/TEMP/TEMP.BMP',False);
end;
没有问题的.
是不是你数据库中原来的数据是坏的.
 
To 龙丹:
的确是我原来库中的数据有问题。
谢谢!我已经给您加上分了。

有什么问题还要请教啊,一定要帮我哦!

 
系统是不是有问题,本来加给龙丹的分数,怎么跑到yanlei身上?
对不起,龙胆,下次补上!
 
后退
顶部