设置文件夹的权限问题

Question

请问大吓，我想设置2000中某个共享文件夹的权限，比如设置everyone 的权限为读取，怎么做啊？如果使用SetFileSecurity，如何使用。谢谢！

Answer 1

使用注册表
uses Registry
var
  MyReg:TRegistry;
//以下为注册表修改
  MyReg:=TRegistry.Create ;
  MyReg.RootKey :=HKEY_LOCAL_MACHINE;MyReg.OpenKey ('\SOFTWARE\Microsoft\Windows\CurrentVersion\Network\LanMan\C',True)
    begin
      MyReg.WriteInteger('Flags',258);  //共享为完全共享
      MyReg.WriteInteger('Type',0);
      MyReg.WriteString('Path','C:\');//共享
      MyReg.WriteString('Re','');
      MyReg.CloseKey ;
    end;

Answer 2

参考Windows的关机办法，首先你要取得系统管理员的权限，然后操作。这个看相关帮助。Delphi有

Answer 3

假如我是系统管理员，我怎么操作啊，如何定义ACL啊。
delphi那里有，请指点啊。