lpwstr shi502_path; //pwidechar;
lpwstr shi502_passwd; // pwidechar;
dword shi502_reserved; // dword ；
// psecurity_descriptor ；一般设为 nil
psecurity_descriptor shi502_security_descriptor;
} share_info_502, *pshare_info_502, *lpshare_info_502;
对应 delphi 纪录声明如下：一定要注意参数类型的正确对应，如果你把pwidechar 声明为 pchar 函数将无法实现此功能，我已经尝试了，你可以再试试，至于原因是什么，我也不太清楚。
type
tshare_info_502 = record
shi502_netname: pwidechar;
shi502_type: dword;
shi502_remark: pwidechar;
shi502_permissions: dword;
shi502_max_uses: dword;
shi502_current_uses: dword;
