Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.08.15;
Скачать: [xml.tar.bz2];

Вниз

Глюк с атрибутами каталога   Найти похожие ветки 

 
Gemini   (2004-07-27 12:40) [0]

Многоуважаемый и всезнающий All! Снизойди до совета.
 Просматриваю дерево катаолгов с помощью FindFirst, FindNext. Примерно так:
Result:=FindFirst(PathInicial+"*.*", faDirectory, SearchRec)
Result:=FindNext(SearchRec)
  На рабочей машине некоторое время назад появился глюк. SearchRec.Attr у каталога не 16 а 2064 и соотв. каталог не определяется как таковой. При этом все чужие программы понимают что это каталог.
  Поначалу после перезагрузки пропадало. Теперь нет. На домашней машине все Ok.
 Что сие такое и как с этим бороться?


 
Sandman25 ©   (2004-07-27 12:42) [1]

а какая разница, 16 или 2064? Проверяйте (Attribute and faDirectory = faDirectory)


 
MU ©   (2004-07-27 12:45) [2]

пиши так:
if (SearchRec.Attr and faDirectory) <> 0 then
...
end;


 
Gemini   (2004-07-28 13:17) [3]


> (Attribute and faDirectory = faDirectory)

Огромное спасибо. Работает.



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

Форум: "Основная";
Текущий архив: 2004.08.15;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.038 c
1-1091470128
GanibalLector
2004-08-02 22:08
2004.08.15
Word с двумя документами


1-1091175674
Гость
2004-07-30 12:21
2004.08.15
Как перехватить нажатие...


4-1088842895
Колбасьев
2004-07-03 12:21
2004.08.15
Запуск процедуры по указателю


1-1091198878
Antonmm
2004-07-30 18:47
2004.08.15
GIF на форме


3-1089963254
dim-
2004-07-16 11:34
2004.08.15
автоматизированной радионавигационной системой дисп. упр.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский