[dec]

Hola,

Una variable del tipo "TStringList" contará con una propiedad "Text", que te devolverá en una cadena ("string") el texto contenido en dicha variable. Por otro lado los "TRichEdit" y los "TMemo" disponen de una propiedad de tipo "TStrings" y es "Lines". Quiere decirse esto, más o menos:

Código Delphi [-]
 begin
   // body es de tipo "TStrings"
   RichEdit.Lines.AddStrings(body);
   Memo.Lines.AddStrings(body);
   // O también
   RichEdit.Lines.Text :=  body.Text;
   Memo.Lines.Text := body.Text;
 end;