IStyleSheet.Load

Синтаксис Fore

Load(Element: IXMLDOMElement);

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

Load(Element: Prognoz.Platform.Interop.MsXml2.IXMLDOMElement);

Параметры

Element. XML-элемент, в который выполняется сохранение таблицы стилей.

Описание

Метод Load загружает таблицу стилей из XML-кода.

Комментарии

Для сохранения таблицы стилей в XML-код используйте метод IStyleSheet.Save.

Пример Fore

Для выполнения примера в репозитории предполагается наличие пустой таблицы стилей с идентификатором «STYLE_TB_NEW». В файловой системе предполагается наличие файла «C:\StyleSheet.xml», содержащего таблицу стилей в виде XML-кода.

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

Sub UserProc;
Var
    mb: IMetabase;
    styleSheet: IStyleSheet;
    Doc: FreeThreadedDOMDocument60;
    Element: IXmlDomElement;
Begin
    // Получаем текущий репозиторий
    mb := MetabaseClass.Active;
    // Получаем таблицу стилей
    styleSheet := mb.ItemById("STYLE_TB_NEW").Edit As IStyleSheet;
    // Выгружаем таблицу стилей в XML-файл
    Doc := New FreeThreadedDOMDocument60.Create;
    Doc.load("C:\StyleSheet.xml");
    Element := Doc.documentElement;
    styleSheet.Load(Element);
    (styleSheet As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера таблица стилей «STYLE_TB_NEW» будет загружена из файла «C:\StyleSheet.xml».

Пример Fore.NET

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

Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.MsXml2;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    styleSheet: IStyleSheet;
    Doc: FreeThreadedDOMDocument60;
    Element: IXmlDomElement;
Begin
    // Получаем текущий репозиторий
    mb := Params.Metabase;
    // Получаем таблицу стилей
    styleSheet := mb.ItemById["STYLE_TB_NEW"].Edit() As IStyleSheet;
    // Выгружаем таблицу стилей в XML-файл
    Doc := New FreeThreadedDOMDocument60.Create();
    Doc.load("C:\StyleSheet.xml");
    Element := Doc.documentElement;
    styleSheet.Load(Element);
    (styleSheet As IMetabaseObject).Save();
End Sub;

См. также:

IStyleSheet