Insertar en el RichEdit!!!
 

Hola delphiano necesito de su sabiduria una vez mas :o . Les cuento mi situación resulta que necesito insertar una palabra en la posicion donde se encuentra el cursor en el RichEdit; lo unico que he logrado hasta ahora es insertar al final del texto :( con el siguiente código:

Código Delphi [-]
if suiListbox1.ItemIndex = -1 then exit;
RichEdit1.Lines.Append('['+suiListbox1.Items.Strings[suiListbox1.ItemIndex]+']');

Alguien seria tan amable de decirme como se podría realizar este proceso :confused:

Una posible solución
 

Hola te doy esta idea que se me ocurre de momento

Código Delphi [-]
var
 a : String;
begin
 a := RichEdit1.Text;
 Insert('lolo',a,RichEdit1.SelStart+1);
 RichEdit1.Text := a;
end;

Está un poco rudimentaria pero funciona :D , si se me ocurre otra forma te escribo.

Saludos

Gracias yusnerqui me funciono.
Mil Gracias :D