[yusnerqui]

también me serviría como se añade texto en un richedit a partir de la posición del cursor.

Prueba algo como esto:

Código Delphi [-]
Var
   S : String;
begin
  S := RichEdit1.Text;
  Insert('Tu Texto',S,RichEdit1.SelStart+1);
  RichEdit1.Text := S;
end;

Saludos