Delphi SetFileAttributes 功能:修改文件属性

最新推荐文章于 2019-04-08 21:17:00 发布
最新推荐文章于 2019-04-08 21:17:00 发布
阅读量2.3k 收藏
点赞数
分类专栏： delphi 文章标签： delphi file function archive system api
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/zhangzhifeng886/article/details/6096738
版权

Delphi SetFileAttributes 功能:修改文件属性

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;
张志峰
关注
专栏目录
DarkAngels勒索病毒分析
weixin_43781139的博客
10-11 1632
对DaekAngle勒索病毒的逆向分析
Delphi修改文件属性
05-08
Delphi修改文件 属性信息，改变文件的只读属性，还有只读属性、系统属性、隐藏属性。操作时点击属性前面的复选框，选中后点击“属性修改”按钮即可。 运行环境：Windows/Delphi7
delphi设置文件和文件夹的属性
10-17
delphi设置文件和文件夹的属性
一个修改文件属性的DELPHI程序
07-12
这是一个修改WINDOWS下文件的属性的例子，在需要个改文件修改时间等属性的场合很有用的
delphi获取文件或文件夹属性和修改属性
wozengcong的专栏
09-29 5556
语句片段： function showAttr(path:string) : integer; var    Attributes:word; begin    Attributes := fileGetAttr(PANsiChar(path)); if (Attributes and faHidden) = faHidden then   //faHidden
Delphi浏览并修改文件属性.rar
07-10
Delphi浏览并修改文件属性，可浏览到需要修改属性的文件夹，选中文件，可修改文件的只读、隐藏、存档、系统等属性，和Windows系统中修改文件属性的功能是一样的。一些具体的属性修改代码： 　　procedure TForm1.FileListBox1Change(Sender: TObject); 　　var 　　 attr:integer; 　　begin 　　 attr:=0; 　　 if FileListBox1.FileName = '' then 　　 begin 　　 cbxReadOnly.Checked:=False; 　　 cbxSysFile.Checked:=False; 　　 cbxHidden.Checked:=False; 　　 cbxArchive.Checked:=False; 　　 exit; 　　 end; 　　 attr:=FileGetAttr(FileListBox1.FileName); 　　 if attr and faReadOnly = faReadOnly then //只读 　　 CBXReadOnly.Checked:=true 　　 else 　　 cbxReadOnly.Checked:=False; 　　 if attr and faSysFile = faSysFile then //系统 　　 CBXSysFile.Checked:=true 　　 else 　　 cbxSysFile.Checked:=False; 　　 if attr and faHidden = faHidden then //隐藏 　　 CBXHidden.Checked:=true 　　 else 　　 cbxHidden.Checked:=False; 　　 if attr and faArchive = faArchive then //存档 　　 CBXArchive.Checked:=true 　　 else 　　 cbxArchive.Checked:=False; 　　end; 　　完整源代码请下载。
Delphi获取文件自身属性信息..rar
04-29
除了`System.IOUtils`单元提供的方法，Delphi的`System.Classes`单元也包含了一些处理文件属性的函数，如`FileAge`用于获取文件的最后修改时间，`FileExists`检查文件是否存在，以及`SetFileAttributes`和`...
delphi11 修改文件属性
最新发布
07-12
要在 Delphi 11 中修改文件属性，你可以使用以下代码： ```delphi uses System.SysUtils, Winapi.Windows; procedure ModifyFileAttributes(const FileName: string; const Attributes: DWORD); begin if not ...
Delphi 文件目录操作.rar
07-10
Delphi还提供了检查和修改文件属性的功能，如隐藏、只读等。通过`GetFileAttributes`和`SetFileAttributes`等函数，开发者可以控制文件的访问权限。 8. **文件流操作**： 对于需要对文件内容进行读写操作的情况，...
uACE.rar_文件操作_Delphi_
08-11
2. **SetFileAttributes**: 另一个重要的API函数，它用于更改文件或目录的属性，包括修改文件的读写权限。例如，如果你想让一个文件变为只读，你可以将FILE_ATTRIBUTE_READONLY标志设置为真。 3. **AccessCheck**: ...
delphi 读取 或 设置 指定文件的时间属性
07-06
delphi 读取 或 设置 指定文件的时间属性的demo程序。你可以为一个指定的文件设置文件时间或读取该文件的时间
用DELPHI设置文件的属性
jinzhili的专栏
03-02 3762
用DELPHI设置文件的属性1. 在interface下的uses中引用filectrl单元2. 首先取文件属性    var              attr : integer;              filename : string;        begin              filename := myfile;              attr     :
delphi 取得、设置文件属性
cuiweigk19423的博客
03-09 316
label1.Caption:= intToStr(FileGetAttr('d:txt.txt') );// 取得文件属性，35:隐藏、只读，存档，32:存档，33:只读 ,34: 隐藏 edit1.Text:=...
[delphi函数]FileGetAttr、FileSetAttr 读取与设置文件属性
weixin_34112208的博客
12-04 482
代码 //读取与设置文件属性FileGetAttr;FileSetAttrvarFileName:string;Attr:Integer;//属性值是一个整数beginFileName:='c:\temp\Test.txt';Attr:=FileGetAttr(FileName);ShowMessage(IntToStr(Attr));//32,存档文件//设置为...
GetFileAttributes和SetFileAttributes
ly379616775的博客
07-03 1441
//////////////////////知识抄袭///////////////////////////////GetFileAttributes || SetFileAttributesBOOL SetFileAttributes(LPCTSTR lpFileName,DWORD dwFileAttributes);    参数：lpFileName:输入参数，为需要设置文件属性的文件或目录。...
Delphi2010 RTTI + Attribute 简单实现ORM实例
weixin_33851604的博客
01-08 498
1、支持ORM，最基础的两个信息是表的信息和字段信息。这两个信息，如果用Attribute 来辅助，代码更简洁和可读性更好。可以把属性名当做真实字段名，也可以将特性里的属性当成真实姓名，再加上字段标题（可以当成注释）、必填字段、是否为主键、显示格式等等，如果没有Attribute ，类、属性的辅助信息必须用其他信息来描述，非常麻烦。 usesSysUtils, RTTI, TypInfo,Typ...
SetFileAttributes
swanabin的专栏
07-16 8699
设置文件属性： SetFileAttributes(文件名， 属性值) 读取文件属性：GetFileAttributes(文件名); 读取文件属性 SetFileAttributes(文件名， FILE_ATTRIBUTE_READONLY); // 设定为只读 SetFileAttributes(文件名， FILE_ATTRIBUTE_HIDDEN );       //设定为隐
SetFileAttributes 设置属性
04-08 4146
1 #include <Windows.h> 2 #include <tchar.h> 3 4 int WINAPI _tWinMain(HINSTANCE hInstance, 5 HINSTANCE hPrevInstance, 6 LPTSTR l...
SetFileAttributes 功能:修改文件属性
weixin_34320159的博客
11-09 657
这是一个修改文件属性的API 使用下面WINDOWS API函数 function SetFileAttributes(lpFileName: PChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributes} function SetFileAttributesA(lpFileName:...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值