zaznaczanie tekstu w richedit

Witam
Czy jest możliwe aby kodem programowym dało się zaznaczyć jakiś tekst w richedit?
tak jak np pare liter zaznaczymy myszka i sa one biale na niebieskim prostokacie a pozostaly tekst bez zmian.

var
Wyraz : string;
begin
Wyraz := 'cosik';
RichEdit1.SelStart := Pos(Wyraz, RichEdit1.Text) - 1;
RichEdit1.SelLength := Length(Wyraz);
RichEdit1.SetFocus;
end;