首先是本地IP的获取:
我们选择最简单的办法,不使用WinSock而直接使用Indy Misc下的TIdIPWatch控件。
然而获取本机名称的方法却一时没能在Indy的控件中找到。
于是我们回到原始的Windows.GetComputerName方法来取得。
代码如下:
unitUnit1;
interface
uses
Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,
Dialogs,IdCustomTCPServer,IdTCPServer,IdIPWatch,IdBaseCompo...[ 查看全文 ]