var
   Element    : TfrxClass;
   frxRTF     : TfrxRichEdit;
begin 
   // 1) из кода ДО формирования отчета найти обьект в отчете 
   Element := frxReport1.FindObject('frxRichEdit1');

   if Element is TfrxRichEdit then
   begin
      // 2) привести еко к типу, удобному для работы
      frxRTF := TfrxRichEdit(Element);

      // 3) подменить RichText
      frxRTF.RichText.LoadFromFile(....);
   end;

   // 5 - 4 - 3 - 2 - 1 поехали
   frxReport1.ShowReport(true);

procedure TForm1.Button1Click(Sender: TObject);
var
   obj            : TfrxComponent;
   frxRTF         : TfrxRichView;
   sRTFFilePath   : string;
begin
   obj := frxReport1.FindObject('Rich1');
   sRTFFilePath := ExtractFilePath(Application.ExeName) + 'Test-RTF.rtf';

   if not Assigned(obj) then
      ShowMessage('Rich1 not found')
   else
   if not (obj is TfrxRichView) then
      ShowMessage('Rich1 is not TfrxRichView: '+obj.ClassName)
   else
   if not FileExists(sRTFFilePath) then
      ShowMessage('RTF-file not found: '+sRTFFilePath)
   else
   begin
      frxRTF := TfrxRichView(obj);

      frxRTF.RichEdit.Lines.LoadFromFile(sRTFFilePath);   
      //frxRTF.RichEdit.Lines.LoadFromStream(mem);

      frxReport1.ShowReport(true);
   end;
end;