VPF::Directory+Hidden - Форум программистов

-=Fox=-

Дата 12.3.2003, 02:05 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 69
Регистрация: 5.2.2003

Репутация: нет
Всего: нет

Привет All!

Как на паскале получив с помощбю FindFirst/FindNext атрибуты каталога, узнать явл. ли он скрытым?
в rec.attr содержится $10, т.е. что это каталог, а информация о том что он срыт отсутсвует. Что делать?

Это сообщение отредактировал(а) -=Fox=- - 12.3.2003, 03:31

serious

Дата 12.3.2003, 03:41 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 316
Регистрация: 15.2.2003
Где: Пенза

Репутация: нет
Всего: 1

Ну. если считать, что директория - это тоже файл, то вот так:

Код

function IsDirectoryHidden (Path : string) : boolean;
var
  Attributes : DWORD;
begin
 try
   Attributes := GetFileAttributes (PChar(Path)); // Получаем аттрибуты
   // Проверяем здесь аттрибуты директории
   if Attributes = FILE_ATTRIBUTE_DIRECTORY+FILE_ATTRIBUTE_HIDDEN then
        Result := true
   else Result := false;

 except
   Result := false; // Директория не существует или еще чего...
 end;
end;

--------------------

Я знаю то, что ничего не знаю, а некоторые не знают и этого.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »