|
共有评论14条
当前显示最后6条评论
|
| penshow |
2006/3/27 9:02:52 |
| 如何在Style组件中设置好Unicode参数呀？请指教，谢谢。 |
| penshow |
2006/3/27 9:08:57 |
| Encode函数如何使用，也请指教，谢谢。 |
| ksoft |
2006/6/8 9:31:19 |
| 我也想做icq程序，也许用上此工具。感谢楼主的共享，共同提高、共同发展。。。 |
| 898898 |
2007/1/9 17:53:13 |
这个控件看起来非常好！我也想用！
可是这个控件有时读汉字不正常，或者有一部分显示不正常！行距也不知道怎么设置，读取HTML时不是很理想！最可怕是另外Rtf不记事本和word读取都不正常！如果存为rvf格式，它自己可以读挺好的！
开发这个控件的人很厉害！佩服！
希望有高手来发扬光大，让我这小辈有机会享福（或许有一天我也会做这样的控件，哈哈我在发梦！） |
| hqh2004 |
2007/4/21 14:28:36 |
解决TRichView_v1911控件出现乱码的方法：
TRichView_v1911是很不错的副文本编辑控件，但是它对中文的支持很差，其中如果文件保存为RTF格式的文档后，再读取时，换行的时候就很可能出现乱码，从Word文档中拷贝过来的文档也会出现乱码。本人经过大量的摸索，发现控件对RVF格式支持的很不错，只要设置TRichViewEdit对应的style 属性的Unicode=true就支持中文。要解决通过剪贴板拷贝过来的Word文档不出现乱码，我才用了下面的的方式实现：
窗体上放置两个TRichViewEdit 控件rve和rve2，两个TRVStyle控件rvs和rvs2，其中设置如下属性：
rve的style为rvs,
rve2的style为rvs2
rve2的visible属性为false
现在我要完成的功能是将从word文档中复制的文档拷贝到rve中而不出现乱码，方法如下：
procedure TF_TextEditor.actPasteExecute(Sender: TObject);
var
i:Integer;
begin
rve2.Clear;
rve2.Paste;
rve2.Format;
for i:=0 to rvs2.TextStyles.Count-1 do
begin
rvs2.TextStyles[i].Standard := True;
rvs2.TextStyles[i].Charset:=GB2312_CHARSET;
rvs2.TextStyles[i].Unicode:=True;
end;
rve2.SelectAll ;
rve2.CopyRVF;
rve.PasteRVF;
for i:=0 to rvs.TextStyles.Count-1 do
begin
rvs.TextStyles[i].Standard := True;
rvs.TextStyles[i].Charset:=GB2312_CHARSET;
rvs.TextStyles[i].Unicode:=True;
end;
end;
此段程序可以放置在一个按钮事件中进行处理。
程序其实很简单，就是先将复制的内容放到rve2中（过渡）,在rve2种将其对应的rvs2的每个的每个TextStyles的unicode属性设置为true。然后选中rve2中的内容，并以RVF的格式复制。最后把复制的RVF格式的内容粘贴到rve中即可，同时设定rve对应得rvs的每个TextStyless的unicode属性设置为true。 这时你会发现rve中的内容在换行时就不是乱码了。这就是曲线救国哈。 |
| feihu0117 |
2007/5/30 10:51:04 |
| 能否能否具体指点一下Encode在哪里增加，怎么使用？ |
| 我要发表评论 |
查看全部评论 |
