本文整理自网络,侵删。
SetFileAttributes 功能:修改文件属性
这是一个修改文件属性的API
使用下面WINDOWS API函数
function SetFileAttributes(lpFileName: PChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributes} function SetFileAttributesA(lpFileName: PAnsiChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributesA} function SetFileAttributesW(lpFileName: PWideChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributesW} function SetFileAttributes(lpFileName: PChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributes} function SetFileAttributesA(lpFileName: PAnsiChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributesA} function SetFileAttributesW(lpFileName: PWideChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributesW}
实例:
SetFileAttributes('C:/test.exe',FILE_ATTRIBUTE_HIDDEN+FILE_ATTRIBUTE_SYSTEM);
下面是文件属性,对应dwFileAttributes
FILE_ATTRIBUTE_READONLY = $00000001; {$EXTERNALSYM FILE_ATTRIBUTE_READONLY} FILE_ATTRIBUTE_HIDDEN = $00000002; {$EXTERNALSYM FILE_ATTRIBUTE_HIDDEN} FILE_ATTRIBUTE_SYSTEM = $00000004; {$EXTERNALSYM FILE_ATTRIBUTE_SYSTEM} FILE_ATTRIBUTE_DIRECTORY = $00000010; {$EXTERNALSYM FILE_ATTRIBUTE_DIRECTORY} FILE_ATTRIBUTE_ARCHIVE = $00000020; {$EXTERNALSYM FILE_ATTRIBUTE_ARCHIVE} FILE_ATTRIBUTE_NORMAL = $00000080; {$EXTERNALSYM FILE_ATTRIBUTE_NORMAL} FILE_ATTRIBUTE_TEMPORARY = $00000100; {$EXTERNALSYM FILE_ATTRIBUTE_TEMPORARY} FILE_ATTRIBUTE_COMPRESSED = $00000800; {$EXTERNALSYM FILE_ATTRIBUTE_COMPRESSED} FILE_ATTRIBUTE_OFFLINE = $00001000;
相关阅读 >>
Delphi webbrowser通过遍历id查找元素是否存在
更多相关阅读请进入《Delphi》频道 >>