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 ;