StrictlyDefined: Boolean;
Свойство StrictlyDefined возвращает признак того, что определены все обязательные атрибуты ряда.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента LanerBox с идентификатором «LanerBox1» и компонента UiErAnalyzer, являющегося источником данных для LanerBox. В UiErAnalyzer должна быть загружена рабочая область базы данных временных рядов.
Перед выполнением примера необходимо выделить в рабочей области добавленный ряд, который необходимо сохранить. Пример будет выполняться при нажатии на кнопку.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Serie: ILanerSerie;
SerieCalc: ILanerCalculateSerie;
Begin
Serie := LanerBox1.SelectedSeries(0);
If Not Serie.StrictlyDefined
Then
WinApplication.InformationBox("Определены не все обязательные атрибуты ряда '" + Serie.Name + "'");
Else
If Serie.SearchFactor = LnSerieFactorSearchResult.Found
Then
WinApplication.InformationBox("Ряд с указанными атрибутами уже существует");
Else
SerieCalc := Serie As ILanerCalculateSerie;
SerieCalc.Save;
End If;
End If;
End Sub Button1OnClick;
После выполнения примера добавленный ряд будет сохранен, если определены все его обязательные атрибуты и они не дублируют существующий ряд.
См. также: