Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.11;
Скачать: CL | DM;

Вниз

Поиск   Найти похожие ветки 

 
Konnor ©   (2006-05-16 16:26) [0]

Подскажите пожалуйста, как в RichEdit-e или Memo найти слово или сочетание символов??


 
Игорь Шевченко ©   (2006-05-16 16:35) [1]

Функция Pos или сообщение EM_FINDTEXT[EX]


 
unknown ©   (2006-05-16 16:44) [2]

function FindTextAndHighlight(AMemo:TMemo; Text:string):integer;
begin
 Result:=Pos(Text,AMemo.Text);
 if Result>0 then
 begin
 { Нашли текст - теперь выделим его}
   AMemo.SelStart:=Pred(Result);
   AMemo.SelLength:=Length(Text);
 end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 FindTextAndHighlight(Memo1,"blablabla");
 Memo1.SetFocus;
end;



Страницы: 1 вся ветка

Текущий архив: 2006.06.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.038 c
2-1148368133
Roman_ln
2006-05-23 11:08
2006.06.11
Алгорим перевода из десятичной в двоичную СС


2-1148564074
AversFm
2006-05-25 17:34
2006.06.11
Ув. мастера. Помогите разобраться с группировкой


15-1147962627
ArtemESC
2006-05-18 18:30
2006.06.11
Как узнать существует ли почта, связанная с данным Mail ом?


2-1148638621
Антоныч
2006-05-26 14:17
2006.06.11
Запуск Excel из дополнительного потока


3-1145346379
Sanych_K_A
2006-04-18 11:46
2006.06.11
Ошибка при подключении к FireBird