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

Вниз

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

 
ДухКороляАртура ©   (2004-03-12 22:16) [0]

Ситуация такая : есть текст в Memo, как определенноее слово в этом тексте выделить? Заранее спасибо.


 
Anatoly Podgoretsky ©   (2004-03-12 22:24) [1]

SelStart/SelLength


 
ДухКороляАртура ©   (2004-03-12 22:52) [2]

Не догоняю, можно чуть по подробнее


 
Defunct ©   (2004-03-12 23:02) [3]

F1


 
Юрий Зотов ©   (2004-03-12 23:11) [4]

Я тут подсчитал...

Ответ "SelStart/SelLength" - 18 символов
Ответ "F1" - 2 символа.

Итого, "чуть по подробнее" оказалось в 9 раз короче. Хотя и действительно намного подробнее, с этим не поспоришь.
:о)


 
ДухКороляАртура ©   (2004-03-13 13:48) [5]

Выделить в смысле сделать слово например жирным


 
Юрий Зотов ©   (2004-03-13 14:01) [6]

> ДухКороляАртура ©   (13.03.04 13:48) [5]

В Memo - никак. Для этого есть RichEdit, а в нем - SelAttributes.


 
TUser ©   (2004-03-13 14:33) [7]

uses strutils;

...

with richedit1 do begin
  Lines.BeginUpdate;
  i:=pos("слово",text);
  if i<>0 then begin
     repeat begin
        selstart:=i;
        sellength:=length("слово");
        selattributes.style:=fsBold;
        i:=posex("слово",text,i);
        end
     until i=0;
  Lines.EndUpdate;
  end;


 
TUser ©   (2004-03-13 14:34) [8]

ЗЫ. 310 символов, безпробелов - 225.



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

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

Наверх




Память: 0.48 MB
Время: 0.049 c
14-1078839141
race1
2004-03-09 16:32
2004.04.04
slow lan


1-1079597785
don-do
2004-03-18 11:16
2004.04.04
Кто поможет, как вкомпилить в программу имя компьютера


8-1069656188
Dmitriy O.
2003-11-24 09:43
2004.04.04
Как вывести автофигуры из ImageList с маштабированием ?


1-1079080186
Tornado
2004-03-12 11:29
2004.04.04
Перенос кода


6-1075220897
*partizan*
2004-01-27 19:28
2004.04.04
Сетевые компоненты в Delphi7