Cambiar el font de un RichEdit

[afxe]

Lo primero es usar las propiedades SelStart y SelLength para seleccionar el texto al que desees asignar atributos, luego utiliza SelAttributes para asignar el atributo que quieras:

with RichEdit1.SelAttributes do
Style := Style + [fsBold];

with RichEdit1.SelAttributes do
Style := Style - [fsBold];

Espero que te sirva.