FastReport и DLL

Комментарии

• AlexTZ

  May 2004 отредактировано 21:09

  Не видит базы на формах основного приложения или что-то еще?
• ItMan

  May 2004 отредактировано 21:09

  
  

  var      ReportSystem:IFastReport;
  ...........
  
  ReportSystem := CreateComObject(StringToGUID('{27473706-CF80-4F8E-B898-809E753FA328}')) as IFastReport;
  ReportSystem.GenerateReport(Application.Handle,DataModule3.ReportsFile);
  

  
  Сама функция:

  Function TFastReport.GenerateReport(AppHandle: THandle;ReportBlobField:TField) : Integer;
  // Функция по генерации отчета по BLOB полю.
   begin
   Result := 0;
      try
       Application.Handle := AppHandle;
       Application.CreateForm(TDMReport, DMReport);
      except
       Result:= -9; // Ошибка создания объекта.
       Exit;
      end;
  
      try
       DMReport.frReport.LoadFromBlobField(ReportBlobField);
      except
       Result:= -8; // Ошибка загрузки шаблона отчета.
       Exit;
      end;
  
      try
       DMReport.frReport.ShowReport;
      except
       Result:= -7; // Ошибка визуализации отчета.
       Exit;
      end;
      Result := 1;
   end;
  

  DMReport простой Data Module с Компонентами FastReport.
  
  
• ItMan

  May 2004 отредактировано 21:09

  AlexTZ написал:

  Не видит базы на формах основного приложения или что-то еще?

  FastReport вызывается из DLL.
  У объекта TfrADOQuery нет не одного Database.
  При налиции FastReport'а в программе все работало, но было принято решение по разбиению программы на модули.
• Vano

  May 2004 отредактировано 21:09

  2 ItMan:
  
  Если у вас будет модульная структура проекта, то ИМХО и отчёты ТОЖЕ ДОЛЖНЫ БЫТЬ НЕЗАВИСЫМЫМИ от остальных модуль ...
  Т.е. в отчёте делаешь ВСЁ и TDataBase и TQuery.
• ItMan

  May 2004 отредактировано 21:09

  Vano написал:

  2 ItMan:
  
  Если у вас будет модульная структура проекта, то ИМХО и отчёты ТОЖЕ ДОЛЖНЫ БЫТЬ НЕЗАВИСЫМЫМИ от остальных модуль ...
  Т.е. в отчёте делаешь ВСЁ и TDataBase и TQuery.

  да я не спорю, но у меня 48 таблиц и все клонировать как-то нет желания. И еще как тогда определить на какой записи пользователь стоит.
  А вот никто не знает, как он их добавляеть, какой процедурой.?.
• ItMan

  May 2004 отредактировано 21:09

  Вопрос к разработчикам:
  Вообще возможно ли FastReport Вывести в DLL?.
  Я имею купленную версию FR. А везде молчат и Support как портизан не ответа, не привета.