Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поиск символов в RichEdit


ford ©   (2009-08-10 10:19:00) 

Загружаю в RichEdit RTF файл
делаю поиск и замену в тексте при помощи такой вот процедуры
Procedure RTFReplace(Src,dst:String);
Var i:Integer;
Begin
  i:=0;
  i:=RxRichEdit1.FindText(src,i,MaxL-i,[TRichSearchType(stwholeword)]);
  While i>0 Do
   Begin
    RxRichEdit1.SelStart:=i;
    RxRichEdit1.SelLength:=Length(src);
    RxRichEdit1.SelText:=dst;
    i:=RxRichEdit1.FindText(src,i+1,MaxL-i-1,[TRichSearchType(stwholeword)]);
   End;
End;


Если я ищу какой либо текст то все ОК,
но если я вызову процедуру с такими параметрами
RTFReplace(''+Chr(173),'');
для того чтобы убрать из текста все "мягкие переносы"
то
в первой же строке поиска результат -1 , т.е. типа таких символов нету
хотя в тексте их море :((

подскажите почему ненаходятся  символы, причем я пробовал найти символ с кодом 63
RTFReplace(''+Chr(63),'');
тотже результат хотя опять таки таких смоволов куча в тексте и в отличии от первого вызова, эти символы отображаются в тексте?


ford   (2009-08-10 10:37:00) [1]

блин, получилось
черт, я не правильно перевел stWholeWord
я понял что это независимость от регистра букв, а
оказалось что это ограничение на поиск строки заключенной разделителями
пробелами
поэтому он и не мог найти символы
а слова находил :)
надо просто было убрать этот параметр


Наверх

Титульная страница Поиск, карта сайта Написать письмо