IMsUORuntime.Coord

Синтаксис

Описание

Свойство Coord возвращает текущую координату, в которой производится расчёт.

Пример

Для выполнения примера в репозитории предполагается наличие контейнера моделирования, содержащего пользовательскую задачу оптимизации. В задаче должен быть задан модуль, реализующий пользовательский алгоритм. Рассмотрим на примере содержимое данного модуля.

Добавьте ссылки на системные сборки: Ms, Xml.

Public Class UserOptimization: Object, IMsUserOptimizationCallback
    Public Sub OnLoad(Xml: IXMLDOMElement);
    Begin
    End Sub OnLoad;

    Public Sub OnSave(Xml: IXMLDOMElement);
    Begin
    End Sub OnSave;

    Public Sub OnBeforeExecute(Calculation: IMsMethodCalculation; Coord: IMsFormulaTransformCoord; Problem: IMsUserOptimizationProblem);
    Begin
    End Sub OnBeforeExecute;

    Public Sub OnExecute(Runtime: IMsUORuntime);
    Var
        Coord: IMsFormulaTransformCoord;
        i, c: Integer;
    Begin
        Coord := Runtime.Coord;
        Debug.WriteLine("--------------------------------------");
        c := Coord.Count;
        Debug.Write("Coord: ");
        For i := 0 To c - 1 Do
            Debug.Write(Coord.Item(i).ToString + " ");
        End For;
        Debug.WriteLine("");
        // Расчёт уравнений в текущей точке
        Runtime.Equations.ExecuteAll;
    End Sub OnExecute;

    Public Sub OnAfterExecute(Calculation: IMsMethodCalculation; Coord: IMsFormulaTransformCoord; Problem: IMsUserOptimizationProblem);
    Begin
    End Sub OnAfterExecute;

    Public Sub OnSetupParams(Params: IMsModelParams);
    Begin
    End Sub OnSetupParams;
End Class UserOptimization;

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

См. также:

IMsUORuntime