F
fenghai4690
Unregistered / Unconfirmed
GUEST, unregistred user!
我想实现这样一个功能,用OLEcontainer提供给用户一个编辑的环境(用户在里面建立表格,表格中有文字,图片),然后我需要提取其中的各个单元格的内容存到数据库里去。
如果olecontainer不能实现的话,这个功能应该用什么方法去实现?
另我用如下代码从数据库中读取blob字段的内容老是报“Invalid stream format”为什么?
var
MeStream: TmemoryStream;
st: TStream;
begin
mestream := tmemorystream.Create;
with simpledataset1 do
begin
dataset.CommandText:= 'select tigan from test1 where id=101';
dataset.Active := true;
st := dataset.CreateBlobStream(dataset.fieldbyname('tigan'),bmread);
mestream.CopyFrom(st,st.Size);
mestream.Position := 0;
olecontainer1.LoadFromStream(mestream);
olecontainer1.DoVerb(1);
st.Free;
mestream.Free;
谢谢各位大虾!!!
如果olecontainer不能实现的话,这个功能应该用什么方法去实现?
另我用如下代码从数据库中读取blob字段的内容老是报“Invalid stream format”为什么?
var
MeStream: TmemoryStream;
st: TStream;
begin
mestream := tmemorystream.Create;
with simpledataset1 do
begin
dataset.CommandText:= 'select tigan from test1 where id=101';
dataset.Active := true;
st := dataset.CreateBlobStream(dataset.fieldbyname('tigan'),bmread);
mestream.CopyFrom(st,st.Size);
mestream.Position := 0;
olecontainer1.LoadFromStream(mestream);
olecontainer1.DoVerb(1);
st.Free;
mestream.Free;
谢谢各位大虾!!!