Страница: 1 |
Вопрос: Как в TreeView несколько уровней делать? | Добавлено: 08.08.07 13:59 |
Автор вопроса: ![]() |
никак не получается.
Смотрите у меня есть treeview и в него надо вставить динамически(зависит какая карта с каким количеством каналов находится в компе) все каналы данной карты. Что у нас есть. Кол-во карт сколько каждая карта имеет каналов и сколько канал ну или данная карта имеет sources получаться должно так примерно. карта1 -канал1 --соурс1 --соурс2 --соурс3 --соурс4 -канал2 --соурс1 --соурс2 и т.д. рисую я через Do Until а проблема в том что не могу расставить как надо, в основном проблема находится в .Nodes.Add ЗдесьНаверно,tvwChlid,,"Channel1" помогите плиз |
Ответы | Всего ответов: 3 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | Цитата | #1 | Добавлено: 08.08.07 19:11 |
Что-то типа:
Private Sub Form_Load()
Dim tiGrandmother As Node Dim tiMammy As Node Dim tiGranddaughter As Node Set tiGrandmother = TreeView1.Nodes.Add Set tiMammy = TreeView1.Nodes.Add(tiGrandmother, tvwChild) Set tiGranddaughter = TreeView1.Nodes.Add(tiMammy, tvwChild) tiGrandmother.Text = "Бабушка" tiMammy.Text = "Мама" tiGranddaughter.Text = "Внучка" tiGrandmother.Expanded = True tiMammy.Expanded = True tiGranddaughter.Expanded = True End Sub Все как надо расставляется. Не пойму в чем проблема. |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 120 Ответов: 438 |
Профиль | Цитата | #2 | Добавлено: 09.08.07 10:21 |
Set tiGrandmother = TreeView1.Nodes.Add
не понял как но у меня тут ошибка выходит, мол типы не подходят ( |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | Цитата | #3 | Добавлено: 09.08.07 13:34 |
Странно, у меня все работает.
Контрол: TreeView1 (Microsoft Windows Common Controls 6.0 SP6) |
Страница: 1 |
|