Помогите как сделать отображение каталогов???

[SANTA_KLAUD]

Срочно нужна помощь.


необходимо сделать чтобы В "дериктори лист бокс" отображались каталоги начиная с корневого котолога программы , а в "файл лист бокс" отображались файлы выбраного каталога.
древа котологов не должны открываться дальше корневого каталога программы т.е если путь такой c://Proga/ то должны открываться каталоги только внутри этой папки

также нужна кнопка добавления любого файла на компьютере в любой каталог программы.

Помогите кто может очень срочно надо я в каталогах ничё не шарю =((

[N!ckeL]

Обязательно ListBox? Можно использовать DirectoryListBox, DriverComBobox, FileListBox

[SANTA_KLAUD]

можно можно используй тока напиши ) если можно через// обеснения где и что за одно хоть пойму
ЗАРАНЕЕ РЕСПЕКТ

[N!ckeL]

Помещаем на форму DirectoryListBox, DriverComBobox, FileListBox, у DirectoryListBox свойство FileList равно FileListBox, у DriverComBobox свойство DirList равно DirectoryListBox.

также нужна кнопка добавления любого файла на компьютере в любой каталог программы.

Что за файл? может создания новой папки?

[SANTA_KLAUD]

у меня 1 форма там поле Edit заполняю поле и создаётся папка в каталоге программы с введённыым именем

терь надо через 2 форму через файл лист добавить какойнибудь файл т.е выбрал каталог в который хочу файл кинуть жму кнопку вылезает ишо одно дерево каталогов но уже по всему компу и там выбираю файл жму ОК и файл добоваляется в каталог в папку

Мудро

[N!ckeL]

Не проще взять edit и opendialog? по нажатию копировать:

var
 s:string;
begin
if opendialog1.execute then
begin
 s:='c:\proga';//путь к вашей проги
if copy(edit1.text, 1, 8)=s then
 copyfile(pansistring(opendialog1.filename), pansistring(edit1.text), true);
end;
end;

[mutabor]

SANTA_KLAUD, используй функции FindFirst, FindNext, если не знаешь как, их же в поиск по форуму в этой ветке - Общие вопросы Дельфи