如何修改自己机器的IP

如何修改自己机器的IP

var Reg: TRegistry; begin   Reg := TRegistry.Create;   Reg.RootKey := HKEY_LOCAL_MACHINE;   if   Reg.OpenKey(\'\System\CurrentControlSet\Services\Class\NetTrans\0000\', True)   then Reg.WriteString(\'IPAddress\',\'192.1.1.1\');   Reg.CloseKey;   Reg.Free; end; end;