200急救!问题已经解决,分也收不回,散分了! (200分)

  • 主题发起人 主题发起人 jlutt-sadan
  • 开始时间 开始时间
J

jlutt-sadan

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟今天使用RichViewEdit中一个文档管理,在查找中文是出现问题了
RichViewEdit的主要设置如下(RichDoc为控件名):
RichDoc.RTFReadProperties.UnicodeMode := rvruMixed;
RichDoc.RTFReadProperties.TextStyleMode:=rvrsAddIfNeeded;
RichDoc.RTFReadProperties.ParaStyleMode:=rvrsAddIfNeeded;
把RichDoc对应的RVStyle的Styles[0]的UniCode设置为false(设置为true是测试过,没有成功)
有文档如下:
国务院关于大力发展职业技术教育的决定……
现在我在文档中查找“国务院”的时候,返回时RichDoc却选中“国务院关于大”;
一般情况下查找纯中文的时候 返回时长度都是查找的两倍 中英文混查时查不到了
下面是我的查找代码:
procedure TFrmDocMain.btnFindTextClick(Sender: TObject);
begin
DlgFind.FindText := RichDoc.GetSelText;
DlgFind.Execute;
end;

procedure TFrmDocMain.DlgFindFind(Sender: TObject);
begin
if not RichDoc.SearchText(DlgFind.FindText,GetRVESearchOptions(DlgFind.Options)) then
Application.MessageBox(PChar(Format(msgNotFount,[DlgFind.FindText])),
PChar(msgFindCompleteTitle),MB_OK or MB_ICONINFORMATION);
end;
请帮帮小弟,谢谢!
 
问题我已经解决了,怎么把分收回呢?
 
没办法收回,只能给我了,谢谢
 
接分啦,
不用动脑筋,你真是好人。
 
送完没有,接分!
 
我贪便宜,嘻嘻……
要分~~~~
 
哈哈………
争取下次回你的问题!
 
以后回答你的问题
 
多人接受答案了。
 
请问如何判断TRichviewedit中的内容为空?
 

Similar threads

后退
顶部