https://yutant.blogspot.com/2017/01/check-internet-connection-on-delphi.html