IWxMetabaseObject.MetabaseObject

Синтаксис

MetabaseObject: IMetabaseObjectDescriptor;

Описание

Свойство MetabaseObject определяет объект репозитория, который будет отображаться в рабочем пространстве.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием "Button1", компонента WorkspaceBox с наименованием WorkspaceBox1 и компонента UiWorkspaceObject, либо UiWorkspace, являющегося источником данных для WorkspaceBox1.

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

Var

MB: IMetabase;

Shape: IWxRectangle;

WxObj: IWxMetabaseObject;

Begin

MB := MetabaseClass.Active;

WorkspaceBox1.View.BeginUpdate;

Shape := WorkspaceBox1.View.Workspace.CreateRectangle;

Shape.Style.TextPosition := WxTextPosition.Bottom;

Shape.CreateExtension("KeWsp.WxMetabaseObject");

Shape.Id := "New_Shape";

WxObj := Shape.Extension As IWxMetaBaseObject;

WxObj.MetabaseObject := MB.ItemById("Etl");

WorkspaceBox1.View.EndUpdate;

End Sub Button1OnClick;

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

См. также:

IWxMetabaseObject