急求助:引用数据类型

mmtxm 2003-09-02 08:51:03
在Delphi中怎样引用windows的数据类型,如SHARE_INFO_2,SHARE_INFO_502
...全文
28 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
mmtxm 2003-09-02
  • 打赏
  • 举报
回复
ACCESS_READ ACCESS_WRITE ACCESS_CREATE ACCESS_EXEC ACCESS_DELETE
ACCESS_ATRIB
ACCESS_PERM ACCESS_ALL 的值列表在哪可以找到??
jerrymousenet2 2003-09-02
  • 打赏
  • 举报
回复
//SHARE_INFO_502
//typedef struct _SHARE_INFO_502
{
LPWSTR shi502_netname;
DWORD shi502_type;
LPWSTR shi502_remark;
DWORD shi502_permissions;
DWORD shi502_max_uses;
DWORD shi502_current_uses;
LPWSTR shi502_path;
LPWSTR shi502_passwd;
DWORD shi502_reserved;
PSECURITY_DESCRIPTOR shi502_security_descriptor;
}
在单元中定义一个,
TSHARE_INFO_502 = record
shi502_netname: WideString;
shi502_type: DWORD;
WideString shi502_remark: WideString;
shi502_permissions: DWORD;
shi502_max_uses: DWORD;
shi502_current_uses: DWORD;
shi502_path: WideString;
shi502_passwd: WideString;
shi502_reserved: DWORD;
shi502_security_descriptor: pSecurityDescriptor; //pSecurityDescriptor在windows.pas中有定义
end;
mmtxm 2003-09-02
  • 打赏
  • 举报
回复
shi2_permissions 的值列表在哪可以找到??
jerrymousenet2 2003-09-02
  • 打赏
  • 举报
回复
typedef struct _SHARE_INFO_2 { LPWSTR shi2_netname; DWORD shi2_type; LPWSTR shi2_remark; DWORD shi2_permissions; DWORD shi2_max_uses; DWORD shi2_current_uses; LPWSTR shi2_path; LPWSTR shi2_passwd;
}
在单元中重新定义一个,

TShare_Info_2 = record
shi2_netname: WideString;
shi2_type: DWORD;
shi2_remark: WideString;
shi2_permissions: DWORD;
shi2_max_uses: DWORD;
shi2_current_uses: DWORD;
shi2_path: WideString;
shi2_passwd: WideString;
end;
lxpbuaa 2003-09-02
  • 打赏
  • 举报
回复
搜索一下没找到,可能Delphi没有重新声明,那么自己用记录来声明吧,原型如下:
typedef struct _SHARE_INFO_2 {
LPTSTR shi2_netname;
DWORD shi2_type;
LPTSTR shi2_remark;
DWORD shi2_permissions;
DWORD shi2_max_uses;
DWORD shi2_current_uses;
LPTSTR shi2_path;
LPTSTR shi2_passwd;
}

————————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
————————————————————————————————————
jerrymousenet2 2003-09-02
  • 打赏
  • 举报
回复
刚才漏了两个
const
ACCESS_READ = 1;
ACCESS_WRITE = 2;
ACCESS_CREATE = 4;
ACCESS_EXEC = 8;
ACCESS_DELETE = 16;
ACCESS_ATRIB = 32;
ACCESS_PERM = 64;
ACCESS_ALL = 127;
jerrymousenet2 2003-09-02
  • 打赏
  • 举报
回复
const
ACCESS_READ = 1;
ACCESS_WRITE = 2;
ACCESS_CREATE = 4;
ACCESS_EXEC = 8;
ACCESS_DELETE = 16;
ACCESS_ALL = 127;
自己定义就行了。

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧