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

解决方案 »

  1.   

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

  2.   

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

  3.   

    修改注册表
    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;
      

  4.   

    用api直接可以改可以用winexec来执行dos命令改注册表的话好像要修复刷新网络连接才生效
      

  5.   

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