如何用Delphi将图像数据保存到sybase数据库中的属性为image的字段中??(100分)

  • 主题发起人 主题发起人 wrgao
  • 开始时间 开始时间
W

wrgao

Unregistered / Unconfirmed
GUEST, unregistred user!
请教各位:
我想把formular one 的sheet保存到后台数据库(sybase)的表中,请
问代码如何实现?
拜托!!!!
 
最好保存到text字段中, 因为image只接受bitmap类图象.
方法以前回答过太多, 如下:
var
x:tmemorystream;
begin
x:=tmemorystream.create;
f1sheet.savetostream(x);
x.position:=0;
table1.edit;
tblobfield(table1.fieldbyname('xxx')).loadfromstream(x);
table1.post;
x.free;
 
2 wrgao:
>>如何用Delphi将图像数据保存到...
>>...把formular one 的sheet保存到...
到底是保存图象还是保存一堆数据?
看起来好象是说要把sheet当作图象保存啊?
不明白

2 cytown:
>>最好保存到text字段中, 因为image只接受bitmap类图象
不一定吧?
以前也曾经把数据(图象)压缩过之后写到image字段里去,没出错啊?
我觉得text和image没什么区别,都是Blob而已

另外,把你的代码改成这样:
var
BlobStream:TBlobStream;
begin
...
with MyDataSet do
begin
Edit;
BlobStream:=TBlobStream.Create(FieldByName('xxx') as TBlobField,
bwReadWrite);
F1Sheet.SaveToStream(BlobStream);
Post;
BlobStream.Free;
end;
...
end;
如何?
 
后退
顶部