rones

HELP PLEASE. I'm using the library above to connect to the internet and get the date, but depending on the wifi connection I use, the system generates an exception and doesn't connect to the internet. What can i do? Follow the line of code below: function internetdate: TDateTime; var IdSNTP: TIDSntp; begin IdSNTP := TIDSntp.Create(nil); try IdSNTP.Host := 'pool.ntp.br'; Application.ProcessMessages; Result := IdSNTP.DateTime; Application.ProcessMessages; finally IdSNTP.Free; end; end