如圖。近日在做一個IP地址切換程式，由于本人技術小白，請各位高人賜教。
uj5u.com熱心網友回復：
研究下cmd命令 netshuj5u.com熱心網友回復：
if regRootKey.OpenKey('\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\' + CardList.Strings[cbb1.ItemIndex], True)
then begin
if CheckBox1.Checked // 判斷是否啟用DHCP
then begin
regRootKey.WriteInteger('EnableDHCP',1);
regRootKey.WriteString('NameServer','');
WriteIp(regRootKey.CurrentKey, 'IPAddress', '0.0.0.0');
WriteIp(regRootKey.CurrentKey, 'SubNetMask','0.0.0.0');
WriteIp(regRootKey.CurrentKey, 'DefaultGateway','');
end
else begin
regRootKey.WriteInteger('EnableDHCP',0);
regRootKey.WriteString('NameServer', Trim(Combobox1.Text));
WriteIp(regRootKey.CurrentKey,'IPAddress',Trim(Edit2.Text));
WriteIp(regRootKey.CurrentKey, 'DefaultGateway', Trim(Edit4.Text));
WriteIp(regRootKey.CurrentKey, 'SubNetMask', Trim(Edit3.Text));
WriteIp(regRootKey.CurrentKey, 'DefaultGateway', Trim(Edit4.Text));
end;
end;可以通過注冊表，設定IP，代碼見上。
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/52179.html
標籤：網絡通信/分布式開發
上一篇：socket編程問題