delphi 如何设置文件属性

本文整理自网络，侵删。

 delphi 如何设置文件属性

procedure TForm1.Button1Click(Sender: TObject); 
begin 
with OpenDialog1 do 
if Execute then 
if SetFileAttributes(PChar(Filename), FILE_ATTRIBUTE_HIDDEN) then 
Caption:='attribute was changed' 
else 
Caption:='attribute was not changed'; 
end;
 

相关阅读 >>

Delphi 时间到就触发事件

Delphi 判断文本文件是否utf-8编码

Delphi利用文件流把文件拆分与合并

Delphi winapi: getfocus - 获取当前拥有焦点的窗口的句柄

Delphi 执行cmd并取得返回值

Delphi 几个实用的html解析函数

Delphi 动态添加资源文件

Delphi winapi: movewindow - 改变窗口的位置与大小

Delphi adoconnection1 连接excel表格读取数据

Delphi 遍历所有目录和子目录下的文件名（可按后缀名遍历）

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 如何设置文件属性