Saving Workspace Changes

This example uses the UiWorkspaceObject1 and WorkspaceBox1 components. UiWorkspaceObject1 with a workspace object is used as a data source for WorkspaceBox1.

Class OBJ17545Form: Form

WorkspaceBox1: WorkspaceBox;

UiWorkspaceObject1: UiWorkspaceObject;

Button1: Button;

Sub OBJ17545FormOnShow(Sender: Object; Args: IEventArgs);

Begin

UiWorkspaceObject1.Instance := (UiWorkspaceObject1.Workspace As IMetabaseObject).Edit;

End Sub OBJ17545FormOnShow;

 

// Process OnClick for the Save button

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Begin

(UiWorkspaceObject1.Instance As IMetabaseObject).Save;

End Sub Button1OnClick;

End Class OBJ17545Form;

On clicking the button changes, made in a workspace are saved.

See also:

Examples