ModelSpace: IMsModelSpace;
Свойство ModelSpace определяет контейнер моделирования, содержащий переменные моделирования, используемые для расчета метода главных компонент.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с идентификатором «Button1» и компонента PCABox с идентификатором «PCABox1». В репозитории имеется контейнер моделирования с идентификатором «CONT_MODEL», содержащий переменные с идентификаторами «X1» и «X2».
Sub FormOnShow(Sender: Object; Args: IEventArgs);
Var
MB: IMetabase;
MS, VarObj: IMetabaseObjectDescriptor;
Begin
MB := MetabaseClass.Active;
MS := MB.ItemById("CONT_MODEL");
PCABox1.ModelSpace := MS.Bind As IMsModelSpace;
VarObj := MB.ItemByIdNamespace("X1", (MS As IMetabaseObject).Key);
PCABox1.AddVariableStub(VarObj.Bind As IVariableStub);
VarObj := MB.ItemByIdNamespace("X2", (MS As IMetabaseObject).Key);
PCABox1.AddVariableStub(VarObj.Bind As IVariableStub);
End Sub FormOnShow;
После выполнения примера при выводе формы на экран компонент «PCABox1» будет подключен к контейнеру моделирования «CONT_MODEL». В список переменных компонента будут загружены две переменные моделирования «X1» и «X2». С помощью данных переменных автоматически будет рассчитан метод главных компонент.
См. также: