//обработчик события TfrxDesigner.OnSaveReport
function TForm1.frxDesignerSaveReport(Report: TfrxReport;
  SaveAs: Boolean): Boolean;
var
   mem         : TMemoryStream;
   sFileName   : string;
   sDateTime   : string;
begin
   Result:=false;

   if not SaveAs then
   begin
      mem:=TMemoryStream.Create();
      try
         mem.Position:=0;
         Report.SaveToStream(mem);
         mem.Position:=0;

         //FDesignField: TBLOBField;
         EditDataset(FDesignField.DataSet);  // моя процедура, вызывает FDesignField.DataSet.Edit() с проверкой

         FDesignField.LoadFromStream(mem);
      finally
         mem.Free();
      end;

      Result:=true;
   end
   else
   begin
      sDateTime:=FormatDateTime('___yyyy-mm-dd___hh-nn',Now());
      sFileName:=ChangeFileExt(ExtractFileName(Report.FileName),'')+sDateTime;

      if SaveFileDialog(sFileName,'*.fr3') then
      begin
         Report.SaveToFile(ChangeFileExt(sFileName,'.fr3'));

         //Result=false !!! должен оставаться!!!, чтобы пользователь получил предупреждение в случае, 
         //если изменения не были сохранены в БЛОБе (хоть и сохранены в файле)
      end;
   end;
end;