IModelBox.ResultsViewSelectionSet

Синтаксис Fore

ResultsViewSelectionSet: IDimSelectionSet;

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

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

Описание

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

Комментарии

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

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

Пример Fore

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

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

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

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

Пример Fore.NET

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

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

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

См. также:

IModelBox