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 tchart使用经验小结

Delphi xe 移动平台 showmodal 范例

Delphi superobject json操作类的基本用法

Delphi 文件占坑法过360查杀

Delphi简单读取网上的文本文件

Delphi 两种登录界面验证写法

Delphi通过代码实现模拟按键的函数

Delphi通过ip或机器名获取局域网mac地址

改写个Delphi 版 lz前辈的openprocess

Delphi一个简单的多线程例子

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

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