IMetabaseListView.CheckedObjects

Синтаксис Fore

CheckedObjects: IMetabaseObjectDescriptors;

Синтаксис Fore.NET

CheckedObjects: Prognoz.Platform.Interop.ExtCtrls.IMetabaseObjectDescriptors;

Описание

Свойство CheckedObjects возвращает коллекцию описаний объектов, у которых в компоненте отмечены флажки.

Комментарии

Свойство актуально, если для компонента свойству Checkboxes установлено значение True.

Пример Fore

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента MetabaseListView с наименованием «MetabaseListView1». Свойству Checkboxes компонента «MetabaseListView1» выставлено значение True, в свойстве Root выбрана какая-либо папка репозитория. Подключите системную сборку Metabase.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Descs: IMetabaseObjectDescriptors;
    Desc: IMetabaseObjectDescriptor;
Begin
    Descs := MetabaseListView1.CheckedObjects;
    
For Each Desc In Descs Do
        Debug.WriteLine(Desc.Name + 
" (" + Desc.Id + ')');
    
End For;
End Sub Button1OnClick;

При нажатии на кнопку в консоль среды разработки будут выведены наименования и идентификаторы объектов, для которых в компоненте «MetabaseListView1» отмечены флажки.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

Imports Prognoz.Platform.Interop.Metabase;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Descs: IMetabaseObjectDescriptors;
    Desc: IMetabaseObjectDescriptor;
Begin
    Descs := MetabaseListViewNet1.CheckedObjects;
    
For Each Desc In Descs Do
        System.Diagnostics.Debug.WriteLine(Desc.Name + 
" (" + Desc.Id + ')');
    
End For;
End Sub;

См. также:

IMetabaseListView