WorkspaceDescriptor: IMetabaseObjectDescriptor;
Свойство WorkspaceDescriptor определяет объект, содержащий описание рабочего пространства задачи.
Для выполнения примера предполагается наличие в репозитории рабочего пространства с идентификатором «OBJ_WORK», контейнера моделирования с идентификатором «OBJ_TRANSFORM». В данном контейнере моделирования должна присутствовать задача с идентификатором «OBJ_PROBLEM».
Sub Main;
Var
Mb: IMetabase;
parent, obj: IMetabaseObject;
prob: IMsProblem;
Workspace: IMetabaseObjectDescriptor;
Begin
Mb := MetabaseClass.Active;
parent := Mb.ItemById("OBJ_TRANSFORM").Bind;
Workspace := Mb.ItemById("OBJ_WORK");
obj := FindObject(parent, "OBJ_PROBLEM").Edit;
prob := obj As IMsProblem;
prob.WorkspaceDescriptor := Workspace;
obj.Save;
End Sub Main;
После выполнения примера, рабочее пространство «OBJ_WORK» будет включено в задачу «OBJ_PROBLEM».
См. также: