почему при 3 ей вложенности папок данный код не берет файлы

Андрюхец
Дата: 28.11.2007 13:49:35
MainForm.PathToFailes:=IncludeTrailingBackslash(MainForm.LabeledEdit1.text+MainForm.PathToFailes);
ires:= FindFirst(MainForm.PathToFailes+'*.*',faAnyfile,sr);
ListBox1.Clear;
While ires=0 do
begin
if (sr.name<>'.') and (sr.Name<>'..') then
begin
ListBox1.Items.Add(sr.Name);
end;
ires:=FindNext(sr)
end;
FindClose(sr);
end;

указываю путь 2 папки вложенность все раподает, а три и последующин не хочет
где ошибка
а может есть другой способ
Карабас Барабас
Дата: 28.11.2007 13:54:32
Андрюхец
посмотри, какой путь в вызов финдфёст поступает

Posted via ActualForum NNTP Server 1.4

Андрюхец
Дата: 28.11.2007 14:02:12
Карабас Барабас
Андрюхец
посмотри, какой путь в вызов финдфёст поступает
Posted via ActualForum NNTP Server 1.4


спасибо нашол касяк
Андрюхец
Дата: 28.11.2007 14:12:40
мона тогда глупый вопрос
как мне имя вот ету строку \\192.168.6.39\asu\Договоры

из етой выделить часть которая после договров (Продажа\123\321)

\\192.168.6.39\asu\Договоры\Продажа\123\321
Карабас Барабас
Дата: 28.11.2007 14:27:35
Андрюхец
выделить часть которая после договров
как выделить ? куда выделить ? что это значит ?
substring и pos тебе что ли подсказать ?

Posted via ActualForum NNTP Server 1.4

Андрюхец
Дата: 29.11.2007 05:47:23
var
a:string;
b:string;
z:string;


a:='\\192.168.6.39\asu\Договоры';
b:='\\192.168.6.39\asu\Договоры\Продажа\123\321';

хочу в z получить 'Продажа\123\321' выделив её из b с помощью a
Anatoly Podgoretsky
Дата: 29.11.2007 07:45:10
Так это POS + COPY
Только зачем, если у тебя всегда есть первая часть, то можно сразу просто DELETE или COPY

Posted via ActualForum NNTP Server 1.4

Андрюхец
Дата: 29.11.2007 07:53:01
Anatoly Podgoretsky
Так это POS + COPY
Только зачем, если у тебя всегда есть первая часть, то можно сразу просто DELETE или COPY
Posted via ActualForum NNTP Server 1.4

моск не варит с утра ребенок всю ночь спать не давал напиши есл ине трудно
плииииз
Anatoly Podgoretsky
Дата: 29.11.2007 08:50:09
Delete + F1
Андрюхец
Дата: 29.11.2007 10:58:48
Anatoly Podgoretsky
Delete + F1



знаю что легко)))
интересное сочетание клавишь, не разу не пробовал