Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Поиск слова в тексте

Автор: MaZder 8.1.2006, 15:52

Здраствуйте! smile

У меня возникла трудность, вобщем надо найти слово в Мемо или richedit, выделить его(знаете как в Delphi), причем в реальном времини, возможно выделить другим цветом smile

Автор: Albinos_x 8.1.2006, 16:01

юзай:

Код


RichEdit1.FindText('find text',starpos,lelng,option);

Автор: Poseidon 8.1.2006, 16:17

Код


const slovo = 'Слово';
var p: integer;
begin
p:= pos(slovo, Memo1.Text);
if p <> 0 then begin Memo1.SelStart:= p; Memo1.SelCount:= Length(slovo); end;
end;

Автор: Guest 8.1.2006, 16:17

Если можно, с примером пожалуйста...
И как выделить слово?

Автор: Albinos_x 8.1.2006, 16:58

пример Poseidon-а выделет текст, если не лшибаюсь, то RichEdit1.FindText тоже...

Автор: FRAGNATIC 8.1.2006, 17:00

Цитата(Guest @ 8.1.2006, 16:17

)

Если можно, с примером пожалуйста...
И как выделить слово?

уже ответили
ещё млжешь posEx заюзать =)
а если искать должен юзер то лучше ваще заюзай сёрчдиалог=)

Автор: Guest 8.1.2006, 17:12

Спасибо, а можно как то выделить слово другим цветом?
Желательно smile

Автор: Albinos_x 8.1.2006, 17:22

Цитата(Guest @ 8.1.2006, 17:12

)

Спасибо, а можно как то выделить слово другим цветом?
Желательно

в ричэдите после выделения установи нужный фонт, а вот в мемо ручками рисовать придётся