Сохранение изменений рабочего пространства

В рассматриваемом примере используются компоненты UiWorkspaceObject1 и WorkspaceBox1. В качестве источника данных для WorkspaceBox1 используется UiWorkspaceObject1, объектом которого является рабочее пространство.

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

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    ws: IWxWorkspace;
Begin
    ws := UiWorkspaceObject1.Instance As IWxWorkspace;
    (UiWorkspaceObject1.Instance As IMetabaseObject).Save;
End Sub Button1OnClick;
Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Workspace;
Imports Prognoz.Platform.Interop.Metabase;

 
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    ws: IWxWorkspace;
Begin
    ws := uiWorkspaceObjectNet1.WorkspaceObjectUi.Instance 
As IWxWorkspace;
    (uiWorkspaceObjectNet1.WorkspaceObjectUi.Instance 
As IMetabaseObject).Save();
End Sub;

После нажатия на кнопку изменения, сделанные на рабочем пространстве, будут сохранены.

См. также:

Примеры