Colorear texto cuadno se escribe

[Alliance]

hola, alguien me puede decir como seria posible colorear ciertos texto miestras se escriben en un TRichEdit.

no pido codigo ni nada, solo una orientacion o idea, es que no se me ocurre nada de como hacerlo.

[dec]

Hola,

Si pones un botón al lado del "RichEdit" y usas su evento "OnClick" para:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  RichEdit1.SelAttributes.Color := clRed;
  RichEdit1.SetFocus();
end;

Verás, que, después de pulsar el botón, el texto que escribas en el "RichEdit" será "rojo", en este caso. "SelAttributes" se aplica al texto seleccionado, o, si no hubiera texto seleccionado, al texto "a partir de la posición en que se encuentre el cursor", si no me equivoco.