IStyledEntity.PredefinedStyle

Синтаксис Fore

PredefinedStyle(Index: Integer): IXmlDomElement;

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

PredefinedStyle[Index: integer]: Prognoz.Platform.Interop.MsXml2.IXMLDOMElement;

Параметры

Index. Индекс стандартного стиля.

Описание

Свойство PredefinedStyle возвращает стандартный стиль в формате XML.

Комментарии

Для получения индекса стандартного стиля используйте свойство IStyledEntity.PredefinedStyleIndex.

Пример Fore

Для выполнения примера необходимо наличие экспресс-отчёта с идентификатором «EAX_STYLE», который содержит таблицу.

В модуле добавьте ссылки на системные сборки: Drawing, Express, Metabase, Xml.

Sub UserProc;
Var
    Mb: IMetabase;
    Report: IEaxAnalyzer;
    Entity: IStyledEntity;
    Index: Integer;
    Img: IGxImage;
    Style: IXMLDOMElement;
    Doc: FreeThreadedDOMDocument60;
Begin
    // Получаем текущий репозиторий
    Mb := MetabaseClass.Active;
    // Получаем экспресс-отчёт
    Report := Mb.ItemById("EAX_STYLE").Edit As IEaxAnalyzer;
    // Получаем стиль таблицы
    Entity := report.Grid.Style.InternalStyle As IStyledEntity;
    // Выводим количество стандартных стилей в окно консоли
    Debug.WriteLine("Количество стандартных стилей: " + entity.PredefinedStyleCount.ToString);
    // Определяем индекс стандартного стиля
    Index := 4;
    Entity.PredefinedStyleIndex := Index;
    // Получаем изображение, используемое для предварительного просмотра стандартного стиля
    Img := Entity.PredefinedStylePreview(Index);
    // Сохраняем изображение, используемое для предварительного просмотра стандартного стиля, в файл формата EMF
    Img.SaveToFile("C:\Style.emf");
    // Получаем стандартный стиль в формате XML
    Style := Entity.PredefinedStyle(Index);
    // Создаем XML-документ
    Doc := New FreeThreadedDOMDocument60.Create;
    // Добавляем стандартный стиль в формате XML в XML-документ
    Doc.appendChild(Style);
    // Сохраняем XML-документ
    Doc.save("C:\Style.xml");
End Sub

В результате выполнения примера:

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.MsXml2;

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    Report: IEaxAnalyzer;
    Entity: IStyledEntity;
    Index: Integer;
    Img: IGxImage;
    Style: IXMLDOMElement;
    Doc: FreeThreadedDOMDocument60;
Begin
    // Получаем текущий репозиторий
    Mb := Params.Metabase;
    // Получаем экспресс-отчёт
    Report := Mb.ItemById["EAX_STYLE"].Edit() As IEaxAnalyzer;
    // Получаем стиль таблицы
    Entity := report.Grid.Style.InternalStyle As IStyledEntity;
    // Выводим количество стандартных стилей в окно консоли
    System.Diagnostics.Debug.WriteLine("Количество стандартных стилей: " + entity.PredefinedStyleCount);
    // Определяем индекс стандартного стиля
    Index := 4;
    Entity.PredefinedStyleIndex := Index;
    // Получаем изображение, используемое для предварительного просмотра стандартного стиля
    Img := Entity.PredefinedStylePreview[Index];
    // Сохраняем изображение, используемое для предварительного просмотра стандартного стиля, в файл формата EMF
    Img.SaveToFile("C:\Style.emf");
    // Получаем стандартный стиль в формате XML
    Style := Entity.PredefinedStyle[Index];
    // Создаем XML-документ
    Doc := New FreeThreadedDOMDocument60.Create();
    // Добавляем стандартный стиль в формате XML в XML-документ
    Doc.appendChild(Style);
    // Сохраняем XML-документ
    Doc.save("C:\Style.xml");
End Sub;

См. также:

IStyledEntity