Dim colRoot As new Collection
Dim myElement As MyElementaryClass
Dim mySubCollection as Collection
'заполняем
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
colRoot.add(myElement)
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
colRoot.add(myElement)
set mySubCollection = new Collection
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
mySubCollection.add(myElement)
'добавляем саму подколлекцию в родительскую
colRoot.add(mySubCollection)
Многояруность
Извините что оращаюсь но вот понадобилось сделать вот что:
Нужно замутить на васике структуру
например
Папка1\Папка1\Папка1\ФайлыВПапке
Папка1\Папка2\Папка1\ФайлыВПапке
я привел пример на папках и файлах - но можно на чем угодно
Предмет1\Тема1\Тест1\Вопросы
Предмет1\Тема2\Тест1\Вопросы
- уровней может быть сколько угодно(например:Предмет1\Тема1\Вопросы)
как мне замутить програмно такое дерево?
если непонятно обьяснил - спросите попытаюсь поподробнее рассказать что мне надо
заранее спасибо
Нужно замутить на васике структуру
например
Папка1\Папка1\Папка1\ФайлыВПапке
Папка1\Папка2\Папка1\ФайлыВПапке
я привел пример на папках и файлах - но можно на чем угодно
Предмет1\Тема1\Тест1\Вопросы
Предмет1\Тема2\Тест1\Вопросы
- уровней может быть сколько угодно(например:Предмет1\Тема1\Вопросы)
как мне замутить програмно такое дерево?
если непонятно обьяснил - спросите попытаюсь поподробнее рассказать что мне надо
заранее спасибо
Цитата:
Originally posted by Putch
Извините что оращаюсь но вот понадобилось сделать вот что:
Нужно замутить на васике структуру
например
Папка1\Папка1\Папка1\ФайлыВПапке
Папка1\Папка2\Папка1\ФайлыВПапке
я привел пример на папках и файлах - но можно на чем угодно
- уровней может быть сколько угодно(например:Предмет1\Тема1\Вопросы)
как мне замутить програмно такое дерево?
Извините что оращаюсь но вот понадобилось сделать вот что:
Нужно замутить на васике структуру
например
Папка1\Папка1\Папка1\ФайлыВПапке
Папка1\Папка2\Папка1\ФайлыВПапке
я привел пример на папках и файлах - но можно на чем угодно
- уровней может быть сколько угодно(например:Предмет1\Тема1\Вопросы)
как мне замутить програмно такое дерево?
Иерархия коллекций, или лучше - иерархия из своих классов, один из которых реализует коллекцию, а другие являются простейшими элементами. Желательно объявить класс-интерфейс, который будет имплементироваться всеми другими классами. Этот класс будет общим типом для всех элементов коллекций, вместо Object.
Простенький пример:
Код:
Разбирать кто есть кто можно, например, через typename().
Заполняется такое дерево обычно через рекурсию.
Цитата:
Originally posted by blind rain
Иерархия коллекций, или лучше - иерархия из своих классов, один из которых реализует коллекцию, а другие являются простейшими элементами. Желательно объявить класс-интерфейс, который будет имплементироваться всеми другими классами. Этот класс будет общим типом для всех элементов коллекций, вместо Object.
Простенький пример:
Разбирать кто есть кто можно, например, через typename().
Заполняется такое дерево обычно через рекурсию.
Иерархия коллекций, или лучше - иерархия из своих классов, один из которых реализует коллекцию, а другие являются простейшими элементами. Желательно объявить класс-интерфейс, который будет имплементироваться всеми другими классами. Этот класс будет общим типом для всех элементов коллекций, вместо Object.
Простенький пример:
Код:
Dim colRoot As new Collection
Dim myElement As MyElementaryClass
Dim mySubCollection as Collection
'заполняем
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
colRoot.add(myElement)
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
colRoot.add(myElement)
set mySubCollection = new Collection
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
mySubCollection.add(myElement)
'добавляем саму подколлекцию в родительскую
colRoot.add(mySubCollection)
Dim myElement As MyElementaryClass
Dim mySubCollection as Collection
'заполняем
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
colRoot.add(myElement)
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
colRoot.add(myElement)
set mySubCollection = new Collection
set myElement = new MyElementaryClass
'иницилизируем свойства myElement как нибудь
'...
mySubCollection.add(myElement)
'добавляем саму подколлекцию в родительскую
colRoot.add(mySubCollection)
Разбирать кто есть кто можно, например, через typename().
Заполняется такое дерево обычно через рекурсию.
Все
понял в каком направлении мыслить ))
Thnks