替换组件 问题求助.
ReplaceDialog 里 查找是FindText 替换成是ReplaceText
要么 在文本里查找到的那些 是哪一个表示?
问题点数:20、回复次数:2Top
1 楼0delphi(睡个舒服觉)回复于 2006-03-01 21:04:05 得分 0
是 FindTexTop
2 楼dytmh(蓝色生命线)回复于 2006-03-01 22:51:34 得分 0
void __fastcall TForm1::ReplaceDialog1Replace(TObject *Sender)
{
int SelPos = RichEdit1->Lines->Text.Pos(ReplaceDialog1->FindText);
if(SelPos > 0)
{
RichEdit1->SelStart = SelPos - 1;
RichEdit1->SelLength = ReplaceDialog1->FindText.Length();
RichEdit1->SelText = ReplaceDialog1->ReplaceText;
}
}
如果,文本里有要被替换的字符有很多的话. 一般替换3.4个就不会再替换了,要么到5.6行就不在替换.就在那重复替换
是什么原因?
还有无法替换中文,就是查找不到中文.
在查找里SetFocus可以把查找到的字符聚集,就是变成被选择的样子.但我在替换里用了没用.不能象windows那个记事本里的替换一样,Top




