Fórum Verificar se internet está Conectada e LIMITADA ou NÃO. #590360
08/01/2018
0
Olá pessoal!
Já tenho um sistema que verifica via Delphi 7 se o Sistema está conectado a internet ou não. O problema é que preciso saber se a Internet está LIMITADA ou NÃO.
Para verificar se a internet está conectada uso a função abaixo:
Alguém pode me ajudar como ver se a conexão está LIMITADA?
Desda Já agradeço.
Giovani
Já tenho um sistema que verifica via Delphi 7 se o Sistema está conectado a internet ou não. O problema é que preciso saber se a Internet está LIMITADA ou NÃO.
Para verificar se a internet está conectada uso a função abaixo:
function Tdesktop.ConnectionKind : boolean; var flags: dword; begin Result := InternetGetConnectedState(@flags, 0); end;
Alguém pode me ajudar como ver se a conexão está LIMITADA?
Desda Já agradeço.
Giovani
Giovani V
Curtir tópico
+ 0
Responder
Posts
08/01/2018
William Finco
Olá Giovani,
Existe o componente TIdHTTP do Delphi para fazer uma tentativa de conexão:
Logo, se o componente não conseguir se conectar a url, o retorno de Result :=False traduzirá que, embora conectado, a conexão é limitada ou nula.
Abs,
Existe o componente TIdHTTP do Delphi para fazer uma tentativa de conexão:
function TMainF.isInternetConnection: Boolean;
begin
try
IdHTTP.Get('http://www.devmedia.com.br');
except
Result := False;
Exit;
end;
Result := True;
end;
Logo, se o componente não conseguir se conectar a url, o retorno de Result :=False traduzirá que, embora conectado, a conexão é limitada ou nula.
Abs,
Responder
Gostei + 0
13/04/2018
Giovani V
Perfeito!
Obrigado
Obrigado
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)