如何用DELPHI来修改计算机名、IP地址、子网掩码、网关、主DNS、副DNS

[aarr_1980]

各位论坛上的大虾，小弟的操作系统是WINXP的，请问如何通过DELPHI来修改计算机名、IP地址、子网掩码、网关、主DNS、副DNS呢？请各位朋友赐教，衷心感谢，谢谢！！！

[brightyang]

用api直接可以改

可以用winexec来执行dos命令

改注册表的话好像要修复刷新网络连接才生效

[lyguo]

呵呵,有delphi写的灰鸽子,好像什么功能都有.锁定鼠标，。。。。。

[luxuewei5214]

搜《delphi网络应用》的源码，里面有例子；

[liangpei2008]

调用dos命令
用winexec执行
netsh interface ip set address 本地连接 static 192.168.1.1 255.255.255.0 192.168.1.1 1

[liangpei2008]

修改注册表
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
if
Reg.OpenKey('具体路径从网上找', True)
then Reg.WriteString('IPAddress','192.1.1.1');
Reg.CloseKey;
Reg.Free;
end;
end;

[liangpei2008]

友情提示LZ：
有问题，百度一下~