Conexão com Internet
Queria saber se alguem tem algum exemplo que funcione que me retorne se eu estou conectado ou não na Internet. Vi muitos exemplos por aí mas nenhum funciona legal, se alguém souber um me passe por favor pois é meio urgente. Grato....
Foxcyber
Curtidas 0
Respostas
Luizfernando777
28/04/2004
inclua na uses WinInet
function ConnectedInternet: Boolean;
var
flags: dword;
begin
Result := InternetGetConnectedState(@flags, 0);
end;
function ConnectedInternet: Boolean;
var
flags: dword;
begin
Result := InternetGetConnectedState(@flags, 0);
end;
GOSTEI 0