Delphi Get Public IP

PublicIP := IdHTTP1.Get('http://automation.whatismyip.com/n09230945.asp');

ref:http://stackoverflow.com/questions/7015483/how-to-get-external-public-ip-in-delphi