SaveToXml(Xml: IXMLDOMElement);
SaveToXml(Xml: Prognoz.Platform.Interop.MsXml2.IXMLDOMElement);
Xml. Объект, в который будут выгружены параметры модели.
Метод SaveToXml сохраняет параметры модели в XML.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки «Button1» и компонента Memo с идентификатором «Memo1». В репозитории должен присутствовать контейнер моделирования с идентификатором «OBJ_TRANSFORM». В данном контейнере должна быть модель с идентификатором «OBJ_MODEL».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
model: IMsModel;
node: IXmlDomElement;
mb: IMetabase;
cl: FreeThreadedDOMDocument60;
transKey: Integer;
Begin
mb := MetabaseClass.Active;
transKey := mb.ItemById("OBJ_TRANSFORM").Key;
model := (mb.ItemByIdNamespace("OBJ_MODEL", rubKey)).Bind As IMsModel;
cl := New FreeThreadedDOMDocument60.Create;
node := cl.createElement((model As IMetabaseObjectDescriptor).Id);
cl.appendChild(node);
model.Transform.SaveToXml(node);
Memo1.Clear;
Memo1.Lines.Add(node.xml);
End Sub Button1OnClick;
После выполнения примера, в компонент «Memo1» будут выведены параметры модели «OBJ_MODEL» в виде XML-кода.
См. также: