IAdhocReportExporter.ExportObjectAsBitmap

Синтаксис Fore

ExportObjectAsBitmap: Boolean;

Синтаксис Fore.NET

ExportObjectAsBitmap: Boolean;

Описание

Свойство ExportObjectAsBitmap определяет, будут ли экспортированы объекты отчета в формат PDF в виде изображения или в виде метафайла.

Пример Fore

Для выполнения примера предполагается наличие аналитической панели с идентификатором «ADHOC».

Добавьте ссылки на системные сборки «Adhoc», «Metabase».

Sub UserProc;
Var
    MB: IMetabase;
    Report: IAdhocReport;
    Exporter: IAdhocReportExporter;
Begin
    MB := MetabaseClass.Active;
    // Получаем аналитическую панель
    Report := MB.ItemById("ADHOC").Bind As IAdhocReport;
    // Создаем объект экспорта
    Exporter := New AdhocReportExporter.Create;
    Exporter.AdhocReport := Report;
    // Выполняем экспорт
    // Экспорт сносок
    Exporter.ExportFootnotes := True;
    // Объекты в виде изображений
    Exporter.ExportObjectAsBitmap := True;
    Exporter.ExportToFile("C:\Adhoc(ObjectImage).pdf", "pdf");
    // Объекты в виде метафайлов
    Exporter.ExportObjectAsBitmap := False;
    Exporter.ExportToFile("C:\Adhoc(ObjectMetafile).pdf", "pdf");
End Sub UserProc;

После выполнения примера содержимое аналитической панели будет экспортировано в два файла формата PDF. В одном из них объекты отчета будут в виде изображений, в другом - в виде метафайлов. Также будут экспортированы сноски.

Пример Fore.NET

Imports Prognoz.Platform.Interop.AdHoc;
Imports Prognoz.Platform.Interop.Metabase;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IAdhocReport;
    Exporter: IAdhocReportExporter = New AdhocReportExporterClass();
Begin
    MB := Params.Metabase;
    // Получаем аналитическую панель
    Report := MB.ItemById["ADHOC"].Bind() As IAdhocReport;
    // Создаем объект экспорта
    Exporter.AdhocReport := Report;
    // Выполняем экспорт
    // Экспорт сносок
    Exporter.ExportFootnotes := True;
    // Объекты в виде изображений
    Exporter.ExportObjectAsBitmap := True;
    Exporter.ExportToFile("C:\Adhoc(ObjectImage).pdf", "pdf");
    // Объекты в виде метафайлов
    Exporter.ExportObjectAsBitmap := False;
    Exporter.ExportToFile("C:\Adhoc(ObjectMetafile).pdf", "pdf");
End Sub;

См. также: