|
#1
|
|||
|
|||
атрибуты файла...
устанавливаю файлу атрибут "только для чтения":
Код:
FileSetAttr(file, faReadOnly); всё прекрасно получилось.. но проблема в снятии именно этого атрибута.. как его снять? |
#2
|
|||
|
|||
да, самое важное забыл...
при установке: Код:
FileSetAttr(file, not faReadOnly) файл исчезает (удаляется наверное) почему? p.s. он не удаляется, он опять появляется когда его из скрытого возвращают... странно очень... Последний раз редактировалось ApplicatiOn, 19.01.2009 в 13:26. |
#3
|
||||
|
||||
Помойму он просто становится системным. (ну типа скрытый только еще круче ) )
Так что удаляй файлы. так снять атрибут только для чтения Код:
FileSetReadOnly('путь', false); |
#4
|
|||
|
|||
а как для скрытого файла?
FileSetHidden ругается |
#5
|
|||
|
|||
ну так никто не знает?
|
#6
|
|||
|
|||
Возми функцию API и сделай сам. Если не ошибаюсь, то тебе нужны GetFileAttr и SetFileAttr. Там все просто.
|
#7
|
||||
|
||||
ничего сложного. Сейчас быстренько написал. Сделал по аналогии с функцией FileSetReadOnly.
Код:
function FileSetHidden(const FileName: string; hid: Boolean): Boolean; var Flags: Integer; begin Result := False; Flags := GetFileAttributes(PChar(FileName)); if hid then Flags := Flags or faHidden else Flags := Flags and not faHidden; Result := SetFileAttributes(PChar(FileName), Flags); end; Последний раз редактировалось :S.p.a.m., 19.01.2009 в 18:12. |
#8
|
|||
|
|||
дада, файлы только пропадают внекуда когда я делаю "системный" и "архивный". А когда делаю скрытый он помечается некой маленькой "черной меткой" (если присмотреться то это часы (видимо временный файл))...
не совсем ясно... p.s. кстати зачем мутить Код:
function FileSetHidden(const FileName: string; hid: Boolean): Boolean; var Flags: Integer; begin Result := False; Flags := GetFileAttributes(PChar(FileName)); if hid then Flags := Flags or faHidden else Flags := Flags and not faHidden; Result := SetFileAttributes(PChar(FileName), Flags); end; это, если Код:
if Check.Checked then FileSetAttr(file, faHidden) else FileSetAttr(file, not faHidden) совсем одинаково функционально? Последний раз редактировалось ApplicatiOn, 19.01.2009 в 19:34. |
#9
|
|||
|
|||
ну так как снять/установить "скрытый" без проблем?
|
#10
|
||||
|
||||
Код:
setfuileattr(filename,faReadOnly or faHidden); Код:
setfuileattr(filename,0); — Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#11
|
|||
|
|||
во.. ) спасибо.. только - filesetattr() а не setfuileattr()
|
#12
|
||||
|
||||
Главное что суть понятна
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |