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.
Не видит базы на формах основного приложения или что-то еще?
FastReport вызывается из DLL.
У объекта TfrADOQuery нет не одного Database.
При налиции FastReport'а в программе все работало, но было принято решение по разбиению программы на модули.
Если у вас будет модульная структура проекта, то ИМХО и отчёты ТОЖЕ ДОЛЖНЫ БЫТЬ НЕЗАВИСЫМЫМИ от остальных модуль ...
Т.е. в отчёте делаешь ВСЁ и TDataBase и TQuery.
Если у вас будет модульная структура проекта, то ИМХО и отчёты ТОЖЕ ДОЛЖНЫ БЫТЬ НЕЗАВИСЫМЫМИ от остальных модуль ...
Т.е. в отчёте делаешь ВСЁ и TDataBase и TQuery.
да я не спорю, но у меня 48 таблиц и все клонировать как-то нет желания. И еще как тогда определить на какой записи пользователь стоит.
А вот никто не знает, как он их добавляеть, какой процедурой.?.
Вопрос к разработчикам:
Вообще возможно ли FastReport Вывести в DLL?.
Я имею купленную версию FR. А везде молчат и Support как портизан не ответа, не привета.
Комментарии
Сама функция: DMReport простой Data Module с Компонентами FastReport.
У объекта TfrADOQuery нет не одного Database.
При налиции FastReport'а в программе все работало, но было принято решение по разбиению программы на модули.
Если у вас будет модульная структура проекта, то ИМХО и отчёты ТОЖЕ ДОЛЖНЫ БЫТЬ НЕЗАВИСЫМЫМИ от остальных модуль ...
Т.е. в отчёте делаешь ВСЁ и TDataBase и TQuery.
А вот никто не знает, как он их добавляеть, какой процедурой.?.
Вообще возможно ли FastReport Вывести в DLL?.
Я имею купленную версию FR. А везде молчат и Support как портизан не ответа, не привета.