如何在没启动workstation服务时候获得本机的工作组

huhuc 2010-01-15 12:21:29
NetWkStaGetInfo和WNet*依赖于workstation服务,但是即使没启动此服务,也可以在我的电脑里改WORKGROUP.
在注册表里搜索改后名称,也只搜到了一个地方PolPrDmN,应该不是这里.
...全文
62 4 打赏 收藏 举报
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
huhuc 2010-01-17
  • 打赏
  • 举报
回复
只98的不行,
那个代码也是用ActiveDS Typelib管理Window用户的
socool627 2010-01-15
  • 打赏
  • 举报
回复
up
bdmh 2010-01-15
  • 打赏
  • 举报
回复
CCC的 2010-01-15
  • 打赏
  • 举报
回复
function GetNetWorkgroup : string;
var
Reg : TRegistry;
begin
Reg := TRegistry.create;
Result := '(n/a)';
with Reg do
try
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('System\CurrentControlSet\Services\VxD\VNETSUP',
false) then
Result := ReadString('Workgroup');
finally
CloseKey;
free;
end;
end;
相关推荐
发帖
Windows SDK/API

1177

社区成员

Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
帖子事件
创建了帖子
2010-01-15 12:21
社区公告
暂无公告