Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.17;
Скачать: CL | DM;

Вниз

Из строки, содержащей путь в TreeView   Найти похожие ветки 

 
cashe   (2003-11-07 23:39) [0]

Добрый день, знатоки Delphi.
Не могу никак реализовать следующее: есть текстовый файл, в котором строка за строкой перечисленны имена файлов в какой-либо директории. Например:
C:\Temp\MyFolder\file1.txt
C:\Temp\MyFolder\file2.txt
C:\Temp\justfile.dat
....
C:\Temp\MyFolder\777\temp.tmp
....
Этих файлов нет на диске, но их пути прописаны в файле.
Как мне восстановить из файла дерево каталогов (и файлов) в TreeView? Чтобы по нему можно было лазить, как в обычном проводнике.
Надеюсь на вашу помощь. Лучше всего кусок кода. Или может уже есть такой готовый компонент, кто сталкивался?
Спасибо!


 
Makhanev A.S. ©   (2003-11-08 00:25) [1]

Как вариант:
1) создаём массив Filenames: TStringList - содержит строки файла, заодно делаем исключение Duplicates
2) бежим в цикле по массиву
for i := 0 to FileNames.Count-1 do
AddToTree(Filenames[i]);

function AddToTree(Path: string);
begin
//создаём TStrings с Delimeter="\".
//бежим по нему, в поисках соответствующего TreeNode,
//если все TreeNodes найдены, то ничего не делаем, иначе - на каждом уровне создаём соответствующий TreeNode
end;


 
cashe   (2003-11-08 01:37) [2]

А можно про Delimeter поподробнее, плз?



Страницы: 1 вся ветка

Текущий архив: 2003.11.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
3-56518
ripp
2003-10-27 17:57
2003.11.17
В Дельфи 6 ругается на VarArrayOf (undeclared identifier)


14-56855
Neox
2003-10-25 21:21
2003.11.17
Router


1-56754
Zanik
2003-11-06 16:03
2003.11.17
Как в Chart задать для Х свои имена?


7-56920
ЗМВ
2003-09-10 15:51
2003.11.17
DLL Libraries


1-56657
maf66
2003-11-05 08:21
2003.11.17
Перегрузка операторов