830
社区成员
发帖
与我相关
我的任务
分享显示及修改blob内容(oracle )
小弟现在用delphi5+oracle816开发数据库程序，
要将图片保存到的人事表的blob字段中。
该如何处理？请各位大虾指教!
要将图片保存到的人事表的blob字段中。
该如何处理？请各位大虾指教!
...全文
请发表友善的回复…
发表回复
taideveloper 2002-03-24
- 打赏
- 举报
我试过了，好像不行啊!
代码如下：
procedure TForm2.Btn_postClick(Sender: TObject);
begin
Query1.Append;
Query1AAAA.LoadFromFile('d:\back.bmp');
//query1AAA为一Blob 字段
Query1.Post;
end;
报告：‘LOB定位器无法扩展事务处理。’
这是为什么？
代码如下：
procedure TForm2.Btn_postClick(Sender: TObject);
begin
Query1.Append;
Query1AAAA.LoadFromFile('d:\back.bmp');
//query1AAA为一Blob 字段
Query1.Post;
end;
报告：‘LOB定位器无法扩展事务处理。’
这是为什么？
taideveloper 2002-03-24
- 打赏
- 举报
多谢楼上这位!
我回去试试!
我回去试试!
kb 2002-03-21
- 打赏
- 举报
procedure TForm1.Btn_LoadImageClick(Sender: TObject);
begin
Table1.Edit;
if OpenPictureDialog1.Execute then
TBlobField(Table1.FieldByName('Image')).LoadFromFile((OpenPictureDialog1.FileName))
else
ShowMessage('error');
end;
保证可以用啊,不过如果你的图片大于32K的话要设置一下bde的blob size 为64K.
begin
Table1.Edit;
if OpenPictureDialog1.Execute then
TBlobField(Table1.FieldByName('Image')).LoadFromFile((OpenPictureDialog1.FileName))
else
ShowMessage('error');
end;
保证可以用啊,不过如果你的图片大于32K的话要设置一下bde的blob size 为64K.
taideveloper 2002-03-20
- 打赏
- 举报
那个方法好像不行吧，
我用的是BLOB类型的字段，不是LONG RAW 类型的!
还有其它方法吗？
我用的是BLOB类型的字段，不是LONG RAW 类型的!
还有其它方法吗？
SimonDW 2002-03-19
- 打赏
- 举报
blob不能通过sql直接访问吧，要通过store procedure ……
具体的就不会了……
具体的就不会了……
r3 2002-03-19
- 打赏
- 举报
DBImage.Picture.LoadFromFile
