Проводник на делфи (переход по директориям)

[zotox]

Знаю как выводить список папок/файлов ... Но меня интересует как путешествовать на директориям, именно на католог выше, две точки (..)(что означает на каталог выше) не удобно подставлять к пути так как такое действие (..)(к выше каталогу) может проявляться скоко угодно раз и это будет не совсем удобно (на скоко я знаю если будет такой путь c:\papka\files\..\ то вроде как(точно не помню) отображается путь c:\papka\)

Вообщем помогите пожалуйста с этим) (в принципе можно резать путь то есть был такой путь c:\papka\files\ при переходе на высший каталог c:\papka\ (то есть режется files\) но это муторно составлять код (я и сам правда не знаю как), я думаю что есть попроще решения)

(ListBox токо интересует!)
И еще... Я про тип TSearchRec; (он выводит папки)

[Stilet]

Ну вообще то есть рекурсивный обход папок... Но я не очень понял что ты имеешь ввиду...

[zotox]

Сообщение от Stilet

Ну вообще то есть рекурсивный обход папок... Но я не очень понял что ты имеешь ввиду...

Да точно... забыл указать...
Я про тип переменной TSearchRec; (он выводит папки)

[Stilet]

Вот когда-то пример давал рекурсивного обхода:
http://www.programmersforum.ru/showt...ighlight=finda
Да вообще их тут полно...

[zotox]

Сообщение от Stilet

Вот когда-то пример давал рекурсивного обхода:
http://www.programmersforum.ru/showt...ighlight=finda
Да вообще их тут полно...

А где там переход по директориям?
Мне нужен переход по директориям... То есть тыкнул на двоеточии в ЛистБоксе (..) и программа переходила на каталог выше

[Stilet]

А где там переход по директориям?

Там дана функция, смысл поиска в FindFirst...FindNext вот и переделай из того примера себе поисковик для указанного каталога.

[zotox]

Сообщение от Stilet

Там дана функция, смысл поиска в FindFirst...FindNext вот и переделай из того примера себе поисковик для указанного каталога.

Я вас не понимаю если честно (на скоко я понял то можно переделать токо переход по каталогам в папке, а вот на каталог выше я не умею переделывать (что и в моей теме написано))

Еще будут варианты у кого то?

[Пепел Феникса]

а что работать со стринг не умеешь?

удаляй последнюю папку тогда(из пути)

[zotox]

Сообщение от Пепел Феникса

удаляй последнюю папку тогда(из пути)

Ну так это то понятно что это можно! Но как я не знаю (даже в гугл не знаю что забивать для поиска этого)

[Пепел Феникса]

function TrimPathOnOneDir(Path:string):string;
begin
 Delete(Path,length(Path),1);//это на всякий...вдруг последний символ косая
 while (Path[Length(Path)]<>'\')and(Path[Length(Path)]<>'/') do Delete(Path,Length(Path),1);
 Delete(Path,Length(Path),1);
 Result:=Path;
end

ну чтото типа такого(писал тут)
но она вылетит если ей в качестве пути передать тупо корень диска(C:\)
допустим