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

Отличие файла от каталога   Найти похожие ветки 

← →
Karburator   (2003-08-25 21:21) [0]

Помогите, как отличить является ли найденное файлом или каталогом (атрибут faDirectory не помогает)

мой код:
procedure TForm1.Button1Click(Sender: TObject);
var
SearchRec: TSearchRec;
begin
if findfirst("c:\test\*", faDirectory, SearchRec)=0 then // нужны тока папки
caption:="*"+fStru.Name;
while (findnext(SearchRec)=0) do
caption:=caption+"*"+fStru.Name;
findclose(fStru);
end;

---

← →
Романов Р.В. ©   (2003-08-25 21:24) [1]

в FAQ

---

← →
Chris   (2003-08-26 00:41) [2]

> Романов Р.В.
Нехорошо... Если уж посылаешь на три буквы, то посылай конкретнее, например http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=1015254946&n=19

---

← →
Anatoly Podgoretsky ©   (2003-08-26 09:37) [3]

Именно атрибут faDirectory и помогает, но ты видимо не знаком с основами двоичной математики, с логическими операциями, но как сказали посмотри в местное FAQ и будет счстье в виде копирования готового кода.

---

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

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



Память: 0.45 MB
Время: 0.024 c