六行代码获取本地IP

uses IdIPWatch; function GetNativeIP: String; var IdIPWatch: TIdIPWatch; begin IdIPWatch := TIdIPWatch.Create(nil); try Result := IdIPWatch.LocalIP; finally IdIPWatch.Free; end; end;

DelphiXE7下编写。

转载于:https://www.cnblogs.com/bhlsheji/p/5265246.html

相关资源：php获取本地IP代码