delphi – 如何在Windows 7中获取域名
发布时间:2020-12-15 09:19:29 所属栏目:大数据 来源:网络整理
导读:我写了一个运行Excel加载项的dll(几年前). 我使用此代码检索域名,并在Windows XP中正常工作,但在Windows 7中失败. 只有我以管理员身份运行才有效. 但是,我不想以管理员身份运行,因为此代码是Excel加载项DLL的一部分,如果以管理员身份运行,Excel无法找到用户
我写了一个运行Excel加载项的dll(几年前).
我使用此代码检索域名,并在Windows XP中正常工作,但在Windows 7中失败. MyReg:= TRegistry.Create; MyReg.RootKey:= HKEY_LOCAL_MACHINE; MyReg.OpenKey(RegKeyWin7,false); NetworkID2:= lowercase(trim(MyReg.ReadString(RegValWin7))); MyReg.CloseKey; FreeAndNil(MyReg); FNetworkOK:= (NetworkID2 = OKRes4); //Temp check to pinpoint the problem. if FNetWorkOK = false then ShowMessage('Error wrong domain: '+NetworkID2) else ShowMessage('all ok'); 如何在正常权限下使用Delphi检索Windows 7中的域名? 解决方法
在Win32 API中使用
NetWkstaGetInfo,通过级别值= 100请求信息.
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |