[ALexandr555]

Вобщем когда меняются параметры например на другой цвет в TRichEdit то почемуто выделенный текст мышкой тоже меняет цвет, как сделать чтобы он не менял цвет но мог выделяться.

[ALexandr555]

текст нужно выделять чтобы копировать... только чтобы он не менял цвет..

[ALexandr555]

в принципе есть идея добавлять это в невидемый второй а затем от туда уже копировать

[ALexandr555]

сделал так

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

procedure AddColoredLine(ARichEdit: TRichEdit; AText: string; AColor: TColor); begin with ARichEdit do begin SelStart := Length(Text); SelAttributes.Color := AColor; SelAttributes.Size := 8; SelAttributes.Name := 'MS Sans Serif'; Lines.Add(AText); end; end;   // А это сам пример procedure TForm1.Button1Click(Sender: TObject); begin AddColoredLine(RichEdit1, 'Hallo', clRed); AddColoredLine(RichEdit1, 'Hallo', clGreen); end;

Админ: А теги за тебя Дед Мороз расставлять будет? ))