ILanerSerie.StrictlyDefined

Синтаксис

StrictlyDefined: Boolean;

Описание

Свойство StrictlyDefined возвращает признак того, что определены все обязательные атрибуты ряда.

Пример

Для выполнения примера предполагается наличие на форме компонентов Button, LanerBox, UiErAnalyzer с наименованиями Button1, LanerBox1 и UiErAnalyzer1 соответственно. UiErAnalyzer1 является источником данных для LanerBox1. В UiErAnalyzer1 должна быть загружена рабочая область базы данных временных рядов. Перед выполнением примера необходимо выделить в рабочей области добавленный ряд, который необходимо сохранить.

Пример является обработчиком события OnClick для компонента Button1.

Добавьте ссылки на системные сборки: Express, ExtCtrls, Forms, Laner, Tab, Ui.

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;

После выполнения примера добавленный ряд будет сохранен, если определены все его обязательные атрибуты и они не дублируют существующий ряд.

См. также:

ILanerSerie