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




Вниз

Всем привет 


Yu   (2002-03-28 10:30) [0]

Как снять к-н атрибут с файла? например - ReadOnly?



PVOzerski   (2002-03-28 10:43) [1]

Посмотри WinAPI-функции SetFileAttributes и GetFileAttributes.



Dok_3D   (2002-03-28 10:46) [2]

Ну есть же функция
FileSetAttr(const FileName: string; Attr: Integer): Integer;

В хелпе даже пример для нее есть.
От нее и пляши ...



Yu   (2002-03-28 10:51) [3]

FileSetAttr устанавливает атрибуты, а нужно СНЯТЬ. Кстати, а что за атрибут VolumeID, не в курсе?



PVOzerski   (2002-03-28 11:13) [4]

>Посмотри WinAPI-функции SetFileAttributes и GetFileAttributes.

>Ну есть же функция
> FileSetAttr(const FileName: string; Attr: Integer): Integer;

А это, по сути дела, без разницы, какой вариант использовать.
Внутренняя реализация:

function FileGetAttr(const FileName: string): Integer;
begin
Result := GetFileAttributes(PChar(FileName));
end;

>FileSetAttr устанавливает атрибуты, а нужно СНЯТЬ
Получаешь старое значение атрибутов, убираешь из него ненужный и устанавливаешь то, что осталось.
Способ "уборки" должен сработать такой:

if Attr and faReadOnly=faReadOnly then
dec(Attr,faReadOnly);



I/O   (2002-03-28 21:34) [5]

Это где-то я видел:
At: Integer;
begin
At:= FileGetAttr(filelistbox1.FileName);
if At and faHidden <> 0 then
FileSetAttr( filelistbox1.FileName, At - faHidden);
end;
А раньше я делал так:
FileSetAttr(filelistbox1.FileName, faHidden-faHidden );



I/O   (2002-03-28 21:40) [6]

faVolumeID - Идентификатор тома



Anatoly Podgoretsky   (2002-03-28 21:50) [7]

I/O © (28.03.02 21:34)
Раньще ты делал неправильно!
FileSetAttr(filelistbox1.FileName, FileGetAttr(filelistbox1.FileName) and not faHidden );




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




Наверх





Память: 0.72 MB
Время: 0.027 c
1-32741           snoup                 2002-03-29 23:25  2002.04.11  
А как создать свой лог-файл который бы вёл журнал(когда/восколько


14-32964          angela                2002-03-04 16:59  2002.04.11  
ini- файлы


7-32996           Сергей Чурсин         2002-01-16 16:02  2002.04.11  
Как убрать записи о неверных P&P устройствах ?


1-32805           Dmitry Sheenok        2002-04-01 10:48  2002.04.11  
Определить по хендлу состояние окна SW_SHOW, SW_HIDE и т.д


6-32921           Chris                 2002-01-26 15:46  2002.04.11  
Повтор вопроса. Как отправить HTML по почте?