TRichEdit, TStringStream: Toma dos...

Yo no seguí el otro hilo, así que hare una pregunta tonta: Si no quieres esa fecha y hora que te molesta en el texto ¿porque la añades? Y si la necesitas, ¿porque no la almacenas en otra lista para no enturbiar tu texto formateado?

Si quieres manipular el richedit para ponerle textos al principio, puedes, pero usando un TRichMemo y sus métodos, si lo tratas como una vulgar cadena, se convierte en una vulgar cadena.

Si como supongo quieres mostrar muchos textos enriquecidos uno debajo de otro, podrías usar varios TRichEdit uno bajo el otro en un panel del tipo que veas, "pegarlo" todo dentro de un richedit así a lo bestiajo no te va a dar muchas alegrías.

...Si quieres manipular el richedit para ponerle textos al principio, puedes, pero usando un TRichMemo y sus métodos, si lo tratas como una vulgar cadena, se convierte en una vulgar cadena...

Pues sí, a ésa conclusión llegué junto con mi patrón..., y decidimos dejar el formato del TRichEdit por la paz. Finalmente, lo que le interesa al usuario es el contenido, no el formato.

Intenta así:

delphi

.
.
.
           
             strFormato := TStringStream.Create(slTexto.Text);
             redtResumenEventos.Lines.LoadFromStream(strFormato);
 
             redtResumenEventos.SelText :=  (FormatDateTime('dd-mm-yyyy', FieldValues['EAPC_FECHA_EVENTO'])+
                                   ' '+MinutsToStr(FieldValues['EAPC_HORA_EVENTO'])+
                                   '  ('+Trim(FieldValues['EAPC_LOGIN_USER'])+') - '{+
                                   RTF2Txt(FieldValues['EAPC_EVENTO'])};         
 
.
.
.

Pues sí, también lo probé, sin resultados. O al menos, no los que yo hubiese querido. Gracias por el apoyo, Fenareth, pero a éstas alturas del desarrollo decidimos que "sencillito es más bonito"...