Форум: "Основная";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];
ВнизRichEdit Найти похожие ветки
← →
Mentov (2004-02-29 17:50) [0]В RichEdit"е есть некоторый текст. Среди прочего там есть фраза "Привет, мир"
Я хочу именно эту фразу подсветить красным цветом. Как это реализовать?
← →
Cardinal (2004-02-29 18:31) [1]
procedure findmytext;
var i: integer;
begin
i:=pos("Привет, мир!",richedit1.Text);
if i<>0 then
begin
richedit1.SelStart:=pos("Привет, мир!",richedit1.Text)-1;
richedit1.SelLength:=length("Привет, мир!");
richedit1.SelAttributes.Color:=clred;
end;
end;
← →
Rayslava (2004-03-01 07:01) [2]А если их несколько? Этих фраз
← →
Clift (2004-03-01 07:18) [3]>Rayslava © (01.03.04 07:01) [2]
А если их несколько? Этих фраз
А Если Подумать................................?????????
procedure findmytext;
var i: integer;
begin
i:=pos("Привет, мир!",richedit1.Text);
WHILE i<>0 do
begin
richedit1.SelStart:=pos("Привет, мир!",richedit1.Text)-1;
richedit1.SelLength:=length("Привет, мир!");
richedit1.SelAttributes.Color:=clred;
i:=pos("Привет, мир!",richedit1.Text);
end;
end;
← →
Clift (2004-03-01 07:20) [4]ОПА!
Чего-то я нетого написал ;)
//НЕбудет работать
← →
TUser (2004-03-01 08:20) [5]richedit1.SelAttributes.Color:=clred;
i:=pos("Привет, мир!",richedit1.Text); // <-- posex
end;
end;
← →
Mentov (2004-03-02 00:06) [6]>posex
а что такое posex?
И еще такой вопрос. Если фраз, которые надо "украсить" много, то постоянно SelStart бегает, отчего возникает неприятное мерцание!!! Можно как-то перевести RichEdit в состоянии Update, чтобы результаты на экране не отображались. А потом, когда SelStart "отбегается" - все это резко отобразить?
← →
Defunct (2004-03-02 00:13) [7]> А потом, когда SelStart "отбегается" - все это резко отобразить?
Все равно будет мерцать.
Lock На уровне Lines:
RichEdit.Lines.BeginUpdate
...
RichEdit.Lines.EndUpdate;
Lock на уровне Control:
SendMessage(RichEdit.Handle, WM_SETREDRAW, 0,0);
...
SendMessage(RichEdit.Handle, WM_SETREDRAW, 1,0);
← →
Mentov (2004-03-03 19:04) [8]Все равно будет мерцать
блин, а как же люди делают? Может RichEdit компонент левый для таких целей? В тех же редакторах (в IDE дельфи) подсвечивается - и ничего не мерцает
← →
Defunct (2004-03-03 19:08) [9]блин, а как же люди делают? Может RichEdit компонент левый для таких целей? В тех же редакторах (в IDE дельфи) подсвечивается - и ничего не мерцает
Так и есть...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.012 c