| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
поиск английских и русских слов в RichEdit [D5, WinXP]
AlexLines © (2005-10-30 16:20:00)Уважаемые знатоки!
делаю поиск по RichEdit
в том случае если искать несколько строк (слов) на русском и английском языке происходит поиск только на английском языке
например при поиске слов поиск и find будет найдено слово find, а поиск нет (слова для поиска беру из поля memo)
for i:=0 to Memo2.Lines.Count-1 do
begin
Start:= 0;
mm:= (Memo2.Lines[i]);
While Start <> - 1 do begin
repeat
Start:=DBRichEdit1.FindText(mm,Start+1,Length(DBRichEdit1.Text),[]);
If Start >= 0 then begin
DBRichEdit1.SelStart:=Start;
DBRichEdit1.SelLength:=Length(mm);
DBRichEdit1.SelAttributes.Color := clGreen;
DBRichEdit1.SelAttributes.Style := [fsBold];
end;
until Start = -1;
end;
end;
AlexLines (2005-10-31 00:25:00) [1]У меня при поиске русских слов нет проблем, но если вместе с русскими искать английские, то можно найти только английские
злобная танька (2005-10-30 21:13:00) [2]он вообще русские слова не находит.. по крайней мере с первого раза. у меня русские слова начинают находиться если до них был найден восклицательный знак. вот такая фигня.
так что лучше не используй эту дебильную функцию ищи слова вручную!
| |
