Подсветка текста

[alexprey]

Допустим что у меня есть TEdit и какой то текст. Что мне нужно: Мне нужно чтобы все слова (например, default) были другим стилем (цвет, курсив, жирный)
TRichEdit не предлагать, т.к. он реально тупо это делает

[DIgorevich]

Значит, тебе придется рисовать на канве Edit'a.

[alexprey]

И как это???

[DIgorevich]

Ну, к примеру, так:

    with (Control as TEdit).Canvas do
    begin
      Font.Color := clRed;//присваиваешь цвет шрифту
      Brush.Color := clBlack;//присваиваешь цвет заливки
      FillRect(Rect);
      TextOut(здесь позицию текста по горизонтали, Здесь позицию текста по вертикали, выводимый текст);
    end;

Ты лучше напиши конкретно, что тебе надо.

[Selestis]

С обычным Edit'ом так просто отформатировать текст не выйдет. Придётся юзать нечто вроде ненавистного вам TRichEdit'а, ибо, готов поспорить, способ DIgorevich'а вас не вдохновил)

[alexprey]

Selestis, я просто уже сделал через TRichEdit, но получилось на вид не очень. Я там ищю нужный текст, выделяю это слово, меняю там форматирования, убираю выделение. В результате получается мерцание
DIgorevich, я вроде бы явно высказал что мне нужно. Видимо ты не читал первый мост. Повторю специально для тебя: надо расскрасить все слова default в тексте

[DIgorevich]

Сообщение от alexprey

Selestis, я просто уже сделал через TRichEdit, но получилось на вид не очень. Я там ищю нужный текст, выделяю это слово, меняю там форматирования, убираю выделение. В результате получается мерцание
DIgorevich, я вроде бы явно высказал что мне нужно. Видимо ты не читал первый мост. Повторю специально для тебя: надо расскрасить все слова default в тексте

Уточняю: ты хотел сказать, что к примеру есть строка "бла-бла-бла default бла-бла-бла...." и надо в этой строке подсветить только слово default ?

[VintProg]

Да он имено это хотел.

[Selestis]

Чтобы убрать мерцание поставьте

RichEdit1.DoubleBuffered:=true;