Originariamente inviato da piccaweb
A mio avviso una possibile soluzione potrebbe essere questa:
sfruttare il posizionamento del cursore per identificare la riga in cui si é situati e successivamente passare all'aggiunta della nuova stringa.

Esempio:
codice:
procedure TForm1.Button1Click(Sender: TObject);
begin
  RichEdit1.Lines.Strings[RichEdit1.CaretPos.Y] := 
 concat (RichEdit1.Lines.Strings[RichEdit1.CaretPos.Y] , ' aggiunta ' );
end;
Prova.

Ciao
Funziona come dovrebbe adesso :gren:
Ho imparato una cosa nuova. Grazie

Per Alka
Non è mia volontà costruire un editor html, mi interessava solo poter aggiungere 3-4 tag per potere scrivere dei messaggi di risposta nel forum anche quando sono non in linea, il tutto semplificandomi un pò le cose..
Ciao