delphi版不重启改ipdns网关.docxVIP

[Pascal(Delphi)] delph版i 不重启改 ip、 dns 、网关 program MASK; uses windows, SysUtils;const MAX_ADAPTER_NAME_LENGTH = 256; MAX_ADAPTER_DESCRIPTION_LENGTH = 128; MAX_ADAPTER_ADDRESS_LENGTH = 8; IPHelper = iphlpapi.dll;type USHORT = WORD; ULONG = DWORD; time_t = Longint; IP_ADDRESS_STRING = record S: array[0