RSS订阅 | 匿名投稿
您的位置:网站首页 > 网络 > 正文

Delphi 正确得到本地IP

作者:admin 来源: 日期:2015/4/27 20:17:51 人气: 标签:

Indy的“indy misc”下有一个“TIdIPWatch”组件,可以正确获得本地IP,即使有多块网卡,也可以正确获得真正本地IP。
一,引入单元文件“IdIPWatch”。
二,实际代码:
procedure TMainForm.localIpBtnClick(Sender: TObject);
var
  IdIPWatch: TIdIPWatch; //TIdIPWatch类实例
begin
  try
    //创建TIdIPWatch类实例
    IdIPWatch := TIdIPWatch.Create(nil);
    //在程序标题栏显示得到的本地IP
    Self.Caption := IdIPWatch.LocalIP;
  finally
    //释放TIdIPWatch类实例
    IdIPWatch.Free;
  end;
end;

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料