Главная страница
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.03 c
1-56700
_FreeMan_
2003-11-08 00:50
2003.11.17
Как запустить почтового клиента?


14-56866
Думкин
2003-10-26 05:14
2003.11.17
С днем рождения! 26 октября.


11-56546
Boguslaw
2003-02-18 21:00
2003.11.17
database, how to implement ? any suggestions ?


14-56818
Nelud
2003-10-23 12:35
2003.11.17
Нужна здоровая критика!


3-56488
Василиск
2003-10-28 11:52
2003.11.17
Ошибка при Post