数据库中有字段pr_info为image类型的。现在需要用richviewedit来存取该字段。但是存取过程中,发现无法显示字体的改变信息。比如当我把richviewedit中的数据字体改变后保存,再次读取的时候字体信息就没有了,和普通的字体一样。请问是什么原因呢,应该如何解决啊?已经被困许久了!谢谢
取:
procedure TForm1.bt1Click(Sender: TObject);
var
mystream:TBlobStream;
begin
mystream:=TBlobStream(adq1.CreateBlobStream(adq1.FieldByName('pr_info'),bmRead));
if Assigned(mystream) then
ShowMessage('not null');
rv1.Clear;
mystream.Position :=0;
rv1.LoadRVFFromStream(mystream);
rv1.Format;
mystream.Free;
end;
存:
procedure TForm1.bt2Click(Sender: TObject);
var
mystream:TMemoryStream;
begin
mystream:=TMemoryStream.Create;
mystream.Position :=0;
rv1.SaveRVFToStream(mystream,false);
adq1.Edit;
TBlobField(adq1.FieldByName('pr_info')).LoadFromStream(mystream);
adq1.Post;
mystream.Free;
end;还有个问题:也是关于这个的请各位大侠也帮忙关照一下
http://community.csdn.net/Expert/topic/4223/4223698.xml?temp=.693844
取:
procedure TForm1.bt1Click(Sender: TObject);
var
mystream:TBlobStream;
begin
mystream:=TBlobStream(adq1.CreateBlobStream(adq1.FieldByName('pr_info'),bmRead));
if Assigned(mystream) then
ShowMessage('not null');
rv1.Clear;
mystream.Position :=0;
rv1.LoadRVFFromStream(mystream);
rv1.Format;
mystream.Free;
end;
存:
procedure TForm1.bt2Click(Sender: TObject);
var
mystream:TMemoryStream;
begin
mystream:=TMemoryStream.Create;
mystream.Position :=0;
rv1.SaveRVFToStream(mystream,false);
adq1.Edit;
TBlobField(adq1.FieldByName('pr_info')).LoadFromStream(mystream);
adq1.Post;
mystream.Free;
end;还有个问题:也是关于这个的请各位大侠也帮忙关照一下
http://community.csdn.net/Expert/topic/4223/4223698.xml?temp=.693844
解决方案 »
- radiogroup中radiobutton
- 通過ADO連接DEF數據庫無法連續查詢
- 问个简单的问题 treeview1添加节点后怎么进入编辑状态
- 怎么转换API声明,有工具吗?
- 如何使我的应用程序一直不失去焦点,除非退出程序?在线~~~~~~~~~~~~~~~急
- 怎么用代码一次性删除RzGroupBar上面的所有Rzgroup呢。。。
- 关于ADOQuery使用中一个密码验证得问题!~
- 听说Delphl7.0出来呢!
- 如何在一张大图片上,定义若干形状不规则的热区???急急急!!!(csdn高手你们该出手了!)
- SQLConfigDataSource动态配置ODBC的问题,我写的代码帮忙看一下
- 怎么实现类似 hint 的窗口??
- 谁编过OMRON的PLC IOServer?沟通一下,来者有分,UP有奖
RVT 或许是结构化的存储结构的 就像DFM
SaveToFile
不知道RVF的格式啊!!
http://community.csdn.net/Expert/topic/4223/4223698.xml?temp=.693844