易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi向WORD写入text字段值时出现乱码

采用Adoquery从数据库查找数据，数据库中该字段为text类型，往WORD中写入时出现乱码
使用语句如下：
TempStr := Adoquery1.FieldValues['Test']);
WordDocument1.Range.InsertAfter(TempStr);//显示乱码

改成TempStr := Adoquery1.Fields[0].AsString;
还是乱码

写入语句没问题，一般的string类型可以正常显示
你Showmessage(TempStr)看是不是乱码。
我试了是正常的。不知道你出了什么问题。
显示tempStr还是乱码,我觉得可能是我们存入数据的方式不一样
我是用流的方式存的，代码如下：
var
TempStream: TMemoryStream;

RichEdit1.Lines.SaveToStream(TempStream);
AdoQuery1.Parameters.ParamByName('Test').LoadfromStream(TempStream,ftString);

你的数据应该是直接存入的吧？
是的。我是直接存的。
什么版本的，是不是宽字符问题
这个和存储方式有关的，如3楼所述，你改用流的方式存贮试一下。
引用
这个和存储方式有关的，如3楼所述，你改用流的方式存贮试一下。

拜托，三楼就是我自己，直接存的话没问题，用流的方式存就不能正确显示了

引用
RichEdit1.Lines.SaveToStream(TempStream)是直接把RichEdit1的所有内容存到流中的，包括控制和字符串，你可以直接把RichEdit1.Lines.Text写到Word中试试。


之前的数据是这么存入数据库的，不过现在写到WORD里面是需要从数据库中读出的
我用RichEdit来接收数据库中的数据，再将它写入到WORD里面这种方法是可以的，不过我想知道有没有一个方法，可以不借用这个控件�


相关问答：

Python中的Unicode在Delphi如何还原成Gb2312？

已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试

在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......

delphi 本地装载驱动 - Delphi / Windows SDK/API

delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......

delphi隐藏运行QQ程序

delphi隐藏运行QQ程序
可以实现隐藏登录！但必须是2008年以前的版本。09及以后自动登录有些难度。

可以实现 不过分太少

可以实现的呀

顶

你到底要干什么,� ......

关闭电脑时,Delphi程序会出发什么事件?

RT
我在关闭Delphi程序的时候需要向INI文件中写点东西.
下次启动Delphi程序的时候需要读,在Delphi程序的OnClose事件中写了没问题,但我发现如果程序开着,然后将机器:开始->关闭计算机->关闭或者重新启动的时� ......

Delphi使用SQL Server如何可以不安装SQLServer2000

如题所示
小弟使用Delphi7环境进行数据采集，采集到的数据放入SQL Server2000数据库中，但是想不安装SQLServer2000来实现从其它计算机上运行此程序，不知如何实现？望各位大虾告知一二。
另外，现在小弟遇到了一个 ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号