IWxViewExporter.FullLengthTitle

Синтаксис Fore

FullLengthTitle: Boolean;

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

FullLengthTitle: boolean;

Описание

Свойство FullLengthTitle определяет, будет ли обрезаться заголовок при экспорте если его ширина превышает ширину рабочего пространства.

Комментарии

Свойство актуально при экспорте объектов, имеющих отдельный заголовок и рабочее пространство

Если свойству FullLengthTitle установить значение True, то экспорт будет произведен таким образом, чтобы заголовок вместился полностью. При этом изображение рабочего пространство будет расположено по центру относительно заголовка.

По умолчанию свойству FullLengthTitle установлено значение False, при этом заголовок обрезается. Изображения заголовка и рабочего пространства будут выровнены относительно левого края.

Пример Fore

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

Добавьте ссылки на системные сборки: Andy, Etl, Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    ETL: IEtlTask;
    Wsp: IWxWorkspace;
    View: IWxView;
    Exporter: IWxViewExporter;
Begin
    MB := MetabaseClass.Active;
    // Получаем рабочее пространство
    ETL := MB.ItemById("ETL").Bind As IEtlTask;
    Wsp := ETL.Workspace;
    View := Wsp.CreateView;
    // Выполняем экспорт
    Exporter := New WxViewExporter.Create;
    Exporter.WxView := View;
    Exporter.FullLengthTitle := True;
    Exporter.ExportToFile("C:\CurrentWS.jpg", "JPG");
End Sub UserProc;

При выполнении примера будет произведен экспорт рабочего пространства задачи ETL. Заголовок будет экспортирован таким образом, чтобы его было видно полностью.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Etl;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    ETL: IEtlTask;
    Wsp: IWxWorkspace;
    View: IWxView;
    Exporter: IWxViewExporter;
Begin
    MB := Params.Metabase;
    // Получаем рабочее пространство
    ETL := MB.ItemById["ETL"].Bind() As IEtlTask;
    Wsp := ETL.Workspace;
    View := Wsp.CreateView();
    // Выполняем экспорт
    Exporter := New WxViewExporter.Create();
    Exporter.WxView := View;
    Exporter.FullLengthTitle := True;
    Exporter.ExportToFile("C:\CurrentWS.jpg", "JPG");
End Sub;

См. также:

IWxViewExporter