ILanerGroupSerie.CanAddChildren

Синтаксис

CanAddChildren:Boolean;

Описание

Свойство CanAddChildren возвращает признак того, возможно ли добавление дочернего ряда в группу рядов. True - дочерний ряд добавить можно, False - дочерний ряд добавить нельзя.

Пример

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

В рабочей книге должно быть выделено два ряда данных. Пример будет выполняться при нажатии на кнопку.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

Serie: ILanerSerie;

GroupSerie: ILanerGroupSerie;

Begin

If LanerBox1.SelectedSeriesCount > 0 Then

Serie := LanerBox1.SelectedSeries(0);

If Serie Is ILanerGroupSerie Then

GroupSerie := Serie As ILanerGroupSerie;

Serie := LanerBox1.SelectedSeries(1);

If GroupSerie.CanAddChildren Then

Serie.MoveToParent(GroupSerie, 0);

Else WinApplication.InformationBox("Невозможно перемещение ряда '" + Serie.Name + "' в группу '" + GroupSerie.Name + "'");

End If;

End If;

End If;

End Sub Button1OnClick;

После выполнения примера второй выделенный ряд будет перемещен в качестве дочернего в первый выделенный ряд. Если данное перемещение невозможно, то будет отображено информационное сообщение.

См. также:

ILanerGroupSerie