//更改ip设置
AnsiString strParam;
strParam = "interface ip set address \"本地连接\" static "+ip地址+" "+子网掩码+" "+网关+" 1";
ShellExecute(Handle,"open","netsh",strParam.c_str(),NULL,SW_HIDE);
//更改DNS:
strParam = "interface ip set dns name = \"本地连接\" source = static addr = "+dns地址;
ShellExecute(Handle,"open","netsh",strParam.c_str(),NULL,SW_HIDE);
//更改Wins:
//strParam = "netsh interface ip set wins name = \"本地连接\" source = static addr = 192.168.0.1"
//ShellExecute(Handle,"open","netsh",strParam.c_str(),NULL,SW_HIDE);