TreeView и GroupBox

[Lex]

Как связать узлы TreeView с GroupBox?

Нужно чтобы при переходе по узлам TreeView на форме появлялись необходимые GroupBox или DBGrid. Знаю, что это реализовывается посредствам индексов, указанных в редакторе TreeView, а как это сделать не могу разобраться .

Подскажите пожалуйста.

Заранее благодарен.

[aTeos]

Мне как-то приходилось делать то же самое. Решил кривовато (на мой взгляд): создал все GroupBox'ы, Top и Left задал у всех один и тот же и сделал их Visible = false (кроме самого первого). Потом, когда щелкаю по TreeView, смотрю индекс и делаю видимым нужный GropuBox, а предыдущий наоборот скрываю.

[Lex]

Спасибо за ответ - уже додумался - так и сделал!!

[Сергей Плоткин]

Насколько я понял, ты делаешь некие настройки для программы.

Чтобы было удобней, можешь сделать следующее... По логике должно работать:

1) У каждого нода при создании делай в Data уникальный идентификатор.

2) Создай невидимый TPageControl. На каждой странице TPageControla размести по одному TGroupBox с именем, к примеру, GroupBox_от 1 и дальше (номер равный идентификатору нужного нода).

3) Рядом с TreeView создай панель, в которой будет появляться GroupBox.

4) В OnChange TreeView выполняй примерно следующее:

(FindComponent('GroupBox'+Индекс) as TGroupBox).Parent:=Панель;

5) Так же по этому же подобию создай процедуру, которая будет скрывать все GroupBox'ы. и выполняй ее прежде в OnChange.

Извини, за частые "вроде" и "по-моему", просто под рукой Delphi нет сейчас, уточнить не могу. Этот способ поможет проще проектировать GroupBox'ы.