delphi不使用idhttp控件,怎么定义一个函数获取外网IP？???

问题描述：

delphi在不使用idhttp控件情况下,怎么定义一个函数获取外网IP？
我这里有一个 但是编译错误 本人菜鸟不知道怎么弄啊

###########################################################
///////////////
function GetIP(const Url: string):string;
/////
begin
idhttp.get(Url);
reuslt := idhttp.body;
end;

///////////////

yourip:=GetIP( 'http://www.bliao.com:2000/ip.phtml ');
////////这个绝对好用--，，只要是不访问外网，其他的都是扯淡。
###########################################################

这是别人定义的` 但是我不会用 编译出错

我希望能呼叫
http://ip.lk52.com/ipfrom.asp 这个地址
然后取里面的返回值。
#######格式######
你的IP是 ：XXX.XXX.XXX.XXX
你的地址是 ：XX市
提供者是 ：电信/网通
#################
不知道http://ip.lk52.com/ipfrom.asp 这个地址的值怎么取。
请DLEPHI高手帮忙看看啊` 看怎么样定义这个函数才能完整使用~

编译错误：
undeclared identifier: 'get' 未说明的标识符<get>
不知道get怎么说明才能使用。。

问题解答：

delphi不使用idhttp控件,怎么定义一个函数获取外网IP？???这个旅游问答期待您的解答，请登录账号或关注微信公众号回答这个问题。