Программный файл: ...\Samples\Solution\OLE\Outline.scx

В представленном примере демонстрируется два различные объекта типа ActiveX, которые используются для вывода иерархической информации. В данном примере отображается структура некоторого Подкаталога (дирректории). Пользовательский Метод с именем FillTree используется рекурсивно для создания и заполнения Дерева соответствующей информацией.

Контрол Treeview обеспечивает отображение соответствующих картинок для кажного элемента рассматриваемой структуры.

Treeview Control (иерархический элемент управления)

Системный Контрол Treeview позволяет наглядно представить структурированную иерархически информацию (например о Каталоге). В отличие от системного контрола Outline, который использует методы и индексы системных элементов, контрол Treeview использует более прогрессивные Коллекции элементов Nodes Collection.

NoteПримечание

Для отображения требуемых картинок для кажного элемента рассматриываемой Коллекции данных в форму необходимо добавить системный Объект ImageList.

  CopyCode imageКопировать Код
* Add items to treeview control
o = THIS.PageFrame1.Page2.oleTreeview
IF cnt = 1
 oNode = o.nodes.add(,1,LOWER(m.path)+"_",LOWER(m.path),,)
 oNode.Image = "world" &&name of image
ELSE
 oNode = o.nodes.add(m.pkey,4,LOWER(m.path)+"_",LOWER(m.path),,)
 oNode.Image = "fldr" &&name of image
ENDIF

См. также