Insertar al final de RichEdit

[jorodgar]

Quiero insertar al final del RichEdit un caracter.
He visto en uno de los hilos lo siguiente, pero no me sirve
ya que el RichEdit1 mio tiene tambien imágenes incrustadas.
Si consigo la solución os la pongo. Si alguien me puede ayudar
se lo agradecería.

var
a : String;
begin
a := RichEdit1.Text;
Insert('lolo',a,RichEdit1.SelStart+1);
RichEdit1.Text := a;
end;