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 xe tparallel.for循环

Delphi动态创建一个ipedit控件

Delphi 万能模糊查询

Delphi共享软件防破解的实用方法

Delphi 2009 之 tedit 加强的功能

Delphi 串口控制继电器

Delphi 修改exe应用程序图标

Delphi 文件路径结尾去掉“\”

Delphi application.restore; 简单用法

Delphi 获取闪盘列表

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

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