Всем привет. Нужно в  TreeView отобразить папки и подкаталоги чтобы выглядело примерно так:
Dir1
     -dir1.1
     -dir1.2
     -dir1.3
              --dir1.3.1
              --dir1.3.2
              --dir1.3.3
Dir2
     -dir2.1
     -dir2.2
     -dir2.3
              --dir2.3.1
              --dir2.3.2
              --dir2.3.3

и т.д. Подскажите пожалуйста как это можно реализовать.

Добавлено через 3 минуты и 28 секунд
И по нажатию на определенную папку получать ее путь. например если кликаем на --dir1.3.2 то получаем примерно C:\Dir1\dir1.3\dir1.3.2
            

И где путь отображаться должен?

да не важно. например в edit или еще гденить. И еще такой вопрос, можно ли как нибудь в TreeView напротив каждого каталога сделать что-то типа checkbox?

Ну может кто подскажет кто как мне вывести подкаталоги в заданной папке....

Отсканировать папку и добавить все, что найдется к списку. См. FindFirst и FindNext из SysUtils

   иБОЯ пробовал но ничего не вышло.


Выводит сначала все нормально, а потом еще и лажу всякую. вот как то так:

D:\Film\fun
D:\Film\metal
D:\Film\ot
D:\Film\system
D:\Film\avatar 2
D:\Film\funfun
D:\Film\metalmetal
D:\Film\otot
D:\Film\systemsystem
D:\Film\avatar 2avatar 2

то есть подкаталоги один раз нормально а потом повторяет имена папок   . Как быть? Выручайте))))   

Строка 17 должна быть

Строка 44:

Domain, а у тебя в задаче было: "... без использования рекурсии" ?

вообще то желательно. а как переписать код правильно?

Добавлено @ 20:06
не так она вроде как и работает рекурсивно. хм... теперь осталось все это дело грамотно распределить в TreeView. 
У меня все еще пару вопросов осталось. 
1. как мне например в TreeView по нажатию на определенную папку получать ее путь. например если кликаем на --dir1.3.2 то получаем примерно C:\Dir1\dir1.3\dir1.3.2 ???
2. Можно ли как нибудь поместить checkbox в TreeView ?

Это сообщение отредактировал(а) Domain - 2.4.2010, 20:14

Переписав компонент под свои нужды   

а что насчет первого вопроса?

Domain, про первую не знаю, а второе можно организовать компонентой VirtualTreeview

а подробнее?

Domain, устанавливаешь с сайта компонент (в списке первый), и в свойства этого компонента есть Checked, и появляются те самые "флажки"

и он по свойствам такой же как TreeView?

Domain, нет(( такой TreeView какой вы хотите только в VS++

поставил...что то я не могу его теперь в билдере найти.

Domain, А компонент установить? (.exe устанавливает папку с файлами для установки, а устанавливать надо вручную)

окей. ставить как всегда?

Domain, сначало VirtualTreesC6.bpk - Make, VirtualTreesC6D.bpk - Install, если при установке появится ошибка, то удали справо в Requires файл ThemeManagerC6.bpi

удалил. потом сделал compile VirtualTreesC6 в процессе появились ошибки:

[Pascal Fatal Error] VirtualTrees.pas(325): File not found: 'ThemeSrv.dcu'
[Linker Fatal Error] Fatal: Unable to open file 'VIRTUALTREES.OBJ'

Domain, В Include Path и Library Path укажите пути к \Soft Gems\Virtual Treeview\Source, $(BDS)\Projects\Bpl и $(BDS)\Projects\BPL, последнее также в Package output directory и BPI/LIB output directory

сделал... все равно пишет [Linker Fatal Error] Fatal: Unable to open file 'VIRTUALTREES.OBJ' хотя на delphi поставил и все гуд, только там мне он не надо)))

Добавлено через 11 минут и 10 секунд
Include Path где его искать?

да не чет не ставит. ладно

В настройках, в Path and Directories

блин все перепробовал. выдает мне 

[Pascal Fatal Error] VirtualTrees.pas(325): File not found: 'ThemeSrv.dcu'
[Linker Fatal Error] Fatal: Unable to open file 'VIRTUALTREES.OBJ' 

тажа ошибка((

Rofar, установки, таки происходит автоматически, компонента в Virtual Controls.

Хотя, наверное, уже поздно, но всё же вот: