AddVariableStub(Stub: IVariableStub);
Stub. Переменная, которая будет использоваться при расчете метода главных компонент.
Метод AddVariableStub осуществляет добавление в компонент переменной, которая будет использоваться при расчете метода главных компонент.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием Button1 и компонента PCABox с наименованием PCABox1. Компонент подключен к контейнеру моделирования, содержащему переменные с идентификаторами X1 и X2.
Пример является обработчиком события OnShow для формы.
Добавьте ссылки на системные сборки: Cubes, ExtCtrls, Forms, Metabase, Ms.
Sub TsetFormOnShow(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 TestFormOnShow;
После выполнения примера при выводе формы на экран компонент PCABox1 будет подключен к контейнеру моделирования CONT_MODEL. В список переменных компонента будут загружены две переменные моделирования X1 и X2. С помощью данных переменных автоматически будет рассчитан метод главных компонент.
См. также: