如何修改自己机器的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;