Delphi 修改服务器端口号.rar

Delphi 修改服务器端口号，这里的商品是指TCP/IP网络协议端口号，关于程序使用方法，这里不再赘述，一些核心的代码片段，先分享： 　　sql.Clear; 　　SQL.Add('use master'); 　　ExecSQL; 　　sql.Clear; 　　sql.Add('xp_instance_regwrite N''HKEY_LOCAL_MACHINE'', N''SOFTWARE\Microsoft\MSSQLServer\MSSQLServer\SuperSocketNetLib\Tcp'', N''TcpPort'', N''REG_SZ'',' '''' edtPostNo.Text ''''); 　　try 　　 ExecSQL; 　　 ShowMessage('端口号修改完成'); 　　finally 　　 Close; 　　end; 　　说明：本功能仅限在服务器端使用，源代码编译运行效果如下图所示，需要源码请在本页面下载。