Вниз
Скачать: CL | DM;

Поиск файла   Найти похожие ветки 

 
odyssey ©   (2003-12-10 19:26) [0]

Необходимо последовательно получить имена файлов. При выполнение
данного кода, переменной filn присваивается не имя файла, а - . (точка). Подскажите, что не верно!

Mask:= "c:\test\*.*";
Attr:=faAnyFile;
FindFirst(mask,Attr,F);
If F.Name<> "" then begin
filn:=F.Name;
...................
While FindNext(F)=0 do filn:=F.Name;


 
Anatoly Podgoretsky ©   (2003-12-10 19:34) [1]

Точка это имя текущей папки.


 
odyssey ©   (2003-12-10 19:35) [2]

Я это понял, а как мне получить имя?


 
panov ©   (2003-12-10 19:38) [3]

используй faAnyFile-faDirectory


 
odyssey ©   (2003-12-10 19:43) [4]

спасибо! все получилось))



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-75142
Dest
2003-12-11 20:09
2003.12.23
Посимвольный вывод текста


1-75199
denmin
2003-12-11 10:36
2003.12.23
Как вывести Memo в QuickRep?


6-75286
BLANG
2003-10-24 17:52
2003.12.23
Сокеты


14-75392
smu
2003-11-28 08:29
2003.12.23
Надежно ли PGP шифрование?


3-75129
Vick
2003-12-01 13:19
2003.12.23
Преобразование vrabinary в varchar




   Наверх