Sub OnIsBrowseableElem(Sender: Object; Args: IMetabaseTreeNodeSpecialEventArgs);
Begin
//набор операторов;
End Sub OnIsBrowseableElem;
Sender. Параметр, возвращающий компонент, сгенерировавший событие.
Args. Параметр, позволяющий определить параметры события.
Событие OnIsBrowseableElem предназначено для установки признака отображения элемента в дереве.
Событие наступает во время построения дерева для каждого элемента, отображаемого в дереве, кроме папок и всех элементов, которым в событии OnIsFolderElem был выставлен признак папки.
В свойстве Node аргумента события можно получить текущий элемент, для которого сгенерировано событие. Если свойству Special аргумента события установить значение True, то текущий элемент Node будет отображаться в дереве компонента. При установке свойству Special значения False элемент будет скрыт.
Для выполнения примера предполагается наличие формы и расположенного на ней компонента MetabaseTreeCombo. Компонент настроен на отображение данных какой-либо папки репозитория. Для компонента в качестве обработчика события OnIsBrowseableElem установлена данная процедура.
Sub MetabaseTreeCombo1OnIsBrowseableElem(Sender: Object; Args: IMetabaseTreeNodeSpecialEventArgs);
Var
s: String;
Begin
s := Args.Node.ObjectDescriptor.Name;
If s.IndexOf("temp") <> -1 Then
Args.Special := False;
End If;
End Sub MetabaseTreeCombo1OnIsBrowseableElem;
После запуска формы в дереве элементов компонента не будут отображаться объекты, содержащие в своем наименовании сочетание "temp".
См. также: