码迷,mamicode.com
首页 > Windows程序 > 详细

delphi 文件夹权限设置(执行一个小脚本的笨办法)

时间:2016-06-14 01:07:09      阅读:677      评论:0      收藏:0      [点我收藏+]

标签:

如题,
研究了一天,也没再网上找到比较好的方式,自己做了一个。
方法如下:

1.创建一个 cmd 命令文件。
2.调用该命令。

代码如下:
   S:=‘echo y|cacls h: /t /c /g everyone:F‘;
  AssignFile(F, ‘c:\FolderRight.cmd‘); 
   rewrite(f);
  Append(F); // 以追加的方式打开文件
   Writeln(F, S); // 将S变量中的内容追加到文本尾后。
   CloseFile(F); // 关闭文件
   ShellExecute(handle,‘open‘,‘c:\FolderRight.cmd‘,‘‘,‘‘,SW_ShowNormal);

注意:只支持 NTFS 格式。
因为Delphi底子比较薄弱,所以本人向来追求简单易学之功效。

分离控制的话,SetFileSecurity不好用,一般还是改ACL的方法

http://bbs.csdn.net/topics/310190565

delphi 文件夹权限设置(执行一个小脚本的笨办法)

标签:

原文地址:http://www.cnblogs.com/findumars/p/5582548.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!