Delphi 获取外网IP的源码

[{"title":"（ 19 个子文件 183KB ） Delphi 获取外网IP的源码","children":[{"title":"获取外网IP","children":[{"title":"Unit1.dfm <span style='color:#111;'> 497B </span>","children":null,"spread":false},{"title":"Project1.exe <span style='color:#111;'> 394.50KB </span>","children":null,"spread":false},{"title":"Unit1.pas <span style='color:#111;'> 578B </span>","children":null,"spread":false},{"title":"Unit1.dcu <span style='color:#111;'> 3.91KB </span>","children":null,"spread":false},{"title":"GetInternetLocalIP.pas <span style='color:#111;'> 1023B </span>","children":null,"spread":false},{"title":"GetInternetLocalIP.dcu <span style='color:#111;'> 4.43KB </span>","children":null,"spread":false},{"title":"控件","children":[{"title":"HTTPGet.dcr <span style='color:#111;'> 472B </span>","children":null,"spread":false},{"title":"HTTPGet.pas <span style='color:#111;'> 11.56KB </span>","children":null,"spread":false}],"spread":true},{"title":"Project1.res <span style='color:#111;'> 876B </span>","children":null,"spread":false},{"title":"Functions.pas <span style='color:#111;'> 3.55KB </span>","children":null,"spread":false},{"title":"GetInternetLocalIP.dfm <span style='color:#111;'> 662B </span>","children":null,"spread":false},{"title":"GetInternetLocalIP.~pas <span style='color:#111;'> 1011B </span>","children":null,"spread":false},{"title":"Unit1.~dfm <span style='color:#111;'> 497B </span>","children":null,"spread":false},{"title":"Unit1.~pas <span style='color:#111;'> 578B </span>","children":null,"spread":false},{"title":"Project1.dof <span style='color:#111;'> 1.07KB </span>","children":null,"spread":false},{"title":"Project1.dpr <span style='color:#111;'> 221B </span>","children":null,"spread":false},{"title":"Project1.cfg <span style='color:#111;'> 362B </span>","children":null,"spread":false},{"title":"Unit1.ddp <span style='color:#111;'> 51B </span>","children":null,"spread":false},{"title":"Functions.dcu <span style='color:#111;'> 3.65KB </span>","children":null,"spread":false}],"spread":false}],"spread":true}]