Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.20;
Скачать: CL | DM;

Вниз

поиск файлов, создание дерева каталогов   Найти похожие ветки 

 
agent   (2005-10-28 18:17) [0]

использую findfirst и findnext для создания дерева каталогов, и поска фалов. но что-то у меня не вяжется :)

 
 findfirst(t, faDirectory, rec);
   if (rec.Name <> ".")and(rec.Name <> "..") then
     TreeView1.Items.AddChild(TreeView1.Selected, rec.Name);

 while findnext( rec ) = 0 do
   if (rec.Name <> ".")and(rec.Name <> "..") then
     TreeView1.Items.AddChild(TreeView1.Selected, rec.Name);


этот код должен выводить только каталоги. но он похоже этого не знает :) и выводит все подряд, кроме системных файлов..
пробовал проверить атрибуты файлов, для всех файлов и папок он вывел 32, то есть $20, а атрибут папки должен быть $10 =(


 
clickmaker ©   (2005-10-28 18:22) [1]

из хелпа:

The Attr parameter specifies the special files to include in addition to all normal files

Руками проверяй атрибуты
(rec.Attr and faDirectory) <> 0


 
agent   (2005-10-28 19:12) [2]

спасибо =)



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

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

Наверх




Память: 0.47 MB
Время: 0.054 c
1-1130491751
DelphiLexx
2005-10-28 13:29
2005.11.20
SetCapture и компонент с Handel ом и Canvas ом


14-1130392088
вразлет
2005-10-27 09:48
2005.11.20
Как правильно тратить деньги: маркетинговые исследования стаи обе


2-1130933037
~SaM~
2005-11-02 15:03
2005.11.20
Как сделать так, что бы окно программы было поверх ВСЕХ окон?


3-1128941214
alex_1234
2005-10-10 14:46
2005.11.20
ADO, dBASE, create table: ошибка синтаксиса при определении поля.


1-1130422795
френк
2005-10-27 18:19
2005.11.20
Как отловить закрытие TPopupMenu?