[Snake22]

нашел способ как добалвять без потери предыдущего форматирования.
посылаем сообщение

Код:

SendMessage(RichEdit1.Handle, EM_REPLACESEL, 0, integer(PCHAR('Текст!')));

текст вставляется от курсора,т.е. курсор должен в конце находится.
может кому пригодится =)