How to determine whether the network is connected in Delphi
uses WinInet; procedure TForm1.Button1Click (Sender: TObject); begin if InternetGetConnectedState (nil ,0) then ShowMessage ('connected'); end ;
Some technical records of code and coder
uses WinInet; procedure TForm1.Button1Click (Sender: TObject); begin if InternetGetConnectedState (nil ,0) then ShowMessage ('connected'); end ;