Текущий архив: 2003.12.23;
Скачать: 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 вся ветка

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

Наверх

Память: 0.47 MB
Время: 0.012 c