Дизайн проекта

1. Создайте новый проект и сохраните его под именем Unit –> TreeUnit, Project –> B_Tree.
2. Измените имя формы на FormTree.
3. Установите в форму элементы управления и компоненты доступа к данным (рис.1):
• ImageList;
• TreeView, изменив имя на TVC, свойство Align:= alLeft, выбрав в свойствах Images и StateImages значение ImageList1;
• Splitter, установив свойство Align:= alLeft;
• Panel, установив свойство Align:= alClient;
• DBGrid, установив свойство Align:= alTop;
• MainMenu;
• PopupMenu1, который свяжите с TVC (TreeView), выбрав в TVC в свойстве PopupMenu значение PopupMenu1;
• ClientDataSet, изменив имя на CDS и DataSource1, изменив имя на DS.

Рис. 1 Расположение компонентов в форме

4. Опишите в редакторе полей CDS (ClientDataSet) следующую структуру полей таблицы:

• ID — номер узла, тип поля AutoInc;
• ParentID — номер родительского узла, тип поля Integer;
• Name — название узла, тип поля String(25).

5. Создайте для CDS доменную структуру, выполнив команду контекстного меню Create Data Set.

6. Сохраните бинарный cds файл в папке проекта под именем TreeNode.cds.

7. Свяжите CDS файлом TreeNode.cds посредством свойства FileName.

8. Свяжите компоненты DS->CDS, DBGrid1->DS, посредством свойств DataSet и DataSource, соответственно.

9. Выберите в форме ImageList1, выполните двойной щелчок мышью по компоненту и добавьте в него картинки (рис. 2), которые в дальнейшем будут отображать узлы дерева.

10. Сохраните проект и скомпилируйте приложение.

Рис. 2 Картинки узлов дерева

Дата добавления: 2015-09-01