delphi中怎样设置共享文件夹，并且给此文件夹加权限？有人会吗？？急啊！等着用呢！各位大哥大姐帮帮忙啊！ (20分)

delphi中怎样设置共享文件夹，并且给此文件夹加权限，也就是说设置授权用户！有人会吗？？急啊！等着用呢！各位大哥大姐帮帮忙啊！

有人会吗？？急啊！等着用呢！各位大哥大姐帮帮忙啊！

修改注册表即可。
REGEDIT4

[HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/CurrentVersion/Network]
"Installed"="1"

[HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/CurrentVersion/Network/Real Mode Net]
"transport"=""
"netcard"=""
"LoadRMDrivers"=hex:00,00,00,00
"preferredredir"="VREDIR"

[HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/CurrentVersion/Network/LanMan]

[HKEY_LOCAL_MACHINE/Software/Microsoft/Windows/CurrentVersion/Network/LanMan/SUNCO]
"Flags"=dword:00000103
"Type"=dword:00000000
"Path"="C://SUNCO"
"Parm2enc"=hex:04,a8,7e
"Parm1enc"=hex:06,a8,7c
"Remark"=""

看看这段代码就明白了