Ms > Интерфейсы сборки Ms > IMsTimeMatrix > IMsTimeMatrix.CurrentIndex
CurrentIndex: Integer;
CurrentIndex: integer;
Свойство CurrentIndex возвращает текущий индекс расчета.
Для получения индекса начала ряда используйте свойство IMsTimeMatrix.StartIndex.
В данном примере описан пользовательский метод.
Для выполнения примера добавьте ссылки на системные сборки Ms, Dimensions, MathFin.
Public Function CalendarLevel(param: IMsTimeMatrix): Variant;
Var
Serie : ITimeSeries;
index, i: integer;
arr: Array Of Double;
Begin
Serie := New TimeSeries.Create;
index := param.CurrentIndex;
If param.CalendarLevel = DimCalendarLevel.Year Then
For i := 0 To param.PointCount - 1 Do
arr := param.Column(i) As Array Of double;
Serie.Item(index) := Math.Max(arr);
End For;
End If;
Return Serie;
End Function CalendarLevel;
Метод находит максимальное значение среди точек ряда матрицы, если ряд матрицы содержит годовую календарную динамику.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Ms;
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.MathFin;
…
Public Function CalendarLevel(param: IMsTimeMatrix): object;
Var
Serie : ITimeSeries;
index, i: integer;
arr: Array Of Double;
Math: MathClass = New MathClass();
Begin
Serie := New TimeSeries.Create();
index := param.CurrentIndex;
If param.CalendarLevel = DimCalendarLevel.dclYear Then
For i := 0 To param.PointCount - 1 Do
arr := param.Column(i) As Array Of double;
Serie.Item[index] := Math.Max(arr);
End For;
End If;
Return Serie;
End Function CalendarLevel;
См. также: