Раскрасить цвет выделения в Rich Edit

← →
alexdn © (2013-02-14 11:01) [0]

Тема вроде бы избитая, но всё таки.. Неужели вообще возможности нет? Не хочется идти к сторонним компонентам.

← →
Германн © (2013-02-14 12:22) [1]

> Неужели вообще возможности нет?

Почему нет? Ты о чём?

← →
alexdn © (2013-02-14 13:24) [2]

> Германн © (14.02.13 12:22) [1]
Ну я почитал об этом немного, там вроде как цвет выделения текста идёт обратным инвертированием от стандартного виндовс. По умолчанию, на практике, чёрным, и поменять вроде бы нельзя.

← →
alexdn © (2013-02-14 13:29) [3]

Это в memo, синеньким, нормально..

← →
O'ShinW © (2013-02-14 14:36) [4]

поиграйся

procedure TForm1.RichEdit1SelectionChange(Sender: TObject);
var
Fmt: RichEdit.CHARFORMAT2;
begin
FillChar(Fmt, SizeOf(Fmt), 0);
Fmt.cbSize := SizeOf(Fmt);
Fmt.dwMask := CFM_BACKCOLOR;
Fmt.crBackColor := clRed;
RichEdit1.Perform(EM_SETCHARFORMAT, SCF_SELECTION, LParam(Addr(Fmt)));
end;

А нет, всё правильно. я просто код чуть чуть изменил. Но самое интересное в d2010 цвет выделения уже голубой по умолчанию, как и в мемо, видно я что то упустил..

Раскрасить цвет выделения в Rich Edit Найти похожие ветки