IModelBox.ParametersSelectionSet

Синтаксис Fore

ParametersSelectionSet: IDimSelectionSet;

Синтаксис Fore.NET

ParametersSelectionSet: Prognoz.Platform.Interop.Dimensions.IDimSelectionSet;

Описание

Свойство ParametersSelectionSet определяет отметку элементов в свободных измерениях моделируемой переменной.

Комментарии

Измерение является свободным, если для каждого элемента используется свой метод расчёта, то есть снят флажок «Использовать одну спецификацию».

Для изменения отметки элементов в свободных измерениях с помощью пользовательского интерфейса используйте панель «Параметры».

Пример Fore

Для выполнения примера предполагается наличие формы, содержащей компонент UiModel с идентификатором «UiModel1» и компонент ModelBox с идентификатором «ModelBox1». «UiModel1» является источником данных для «ModelBox1» и содержит загруженную модель. Данная модель должна иметь дополнительные свободные измерения.

Добавьте ссылку на системную сборку «Dimensions».

Sub UserParam;
Var
    DimSel: IDimSelection;
Begin
    // Получаем отметку в первом свободном измерении
    DimSel := ModelBox1.ParametersSelectionSet.Item(0);
    // Сбрасываем текущую отметку
    DimSel.DeselectAll;
    // Выделяем первый элемент
    DimSel.SelectElement(0False);
    // Сохраняем изменения
    ModelBox1.SaveObject;
End Sub UserParam;

Результат выполнения примера: для модели будет отображен метод расчёта, заданный для первого элемента свободного измерения.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

Imports Prognoz.Platform.Interop.Ms;
Imports Prognoz.Platform.Interop.Dimensions;

Public Sub UserParam();
Var
    DimSel: IDimSelection;
Begin
    // Получаем отметку в первом свободном измерении 
    DimSel := modelBoxNet1.CtrlBox.ParametersSelectionSet.Item[0];
    // Сбрасываем текущую отметку
    DimSel.DeselectAll();
    // Выделяем первый элемент
    DimSel.SelectElement(0False);
    // Сохраняем изменения
    modelBoxNet1.CtrlBox.SaveObject();
End Sub UserParam;

См. также:

IModelBox