Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Delphi - Verificare se si è connessi o no
Forum - Delphi - Verificare se si è connessi o no

Avatar
Anonymous (Member)
Guru


Messaggi: 1059
Iscritto: 30/07/2006

Segnala al moderatore
Postato alle 14:21
Giovedì, 21/06/2007
come si fa per accertarsi se è attiva una connessione ad internet o meno?

PM Quote
Avatar
K.Mitnick (Member)
Expert


Messaggi: 278
Iscritto: 24/03/2007

Segnala al moderatore
Postato alle 12:28
Venerdì, 22/06/2007
La seguente funzione restituisce true se è attiva una connessione a Internet:

Codice sorgente - presumibilmente Delphi

  1. uses WinInet;
  2.  
  3. function ConnessioneInternetAttiva: Boolean;
  4. const
  5.     INTERNET_CONNECTION_MODEM = 1; // Viene utilizzato un modem per connettersi a Internet
  6.     INTERNET_CONNECTION_LAN = 2; // Viene usata una Lan locale per connettersi a Internet
  7.     INTERNET_CONNECTION_PROXY = 4; // Viene utilizzato un proxy server per connettersi a Internet
  8.     INTERNET_CONNECTION_MODEM_BUSY = 8; // Il modem e' in uso per una connessione non-Internet
  9. var
  10.     dwConnectionTypes : DWORD;
  11. begin
  12.     dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY;
  13.     Result := InternetGetConnectedState(@dwConnectionTypes,0);
  14. end;


Ultima modifica effettuata da K.Mitnick il 22/06/2007 alle 12:29
PM Quote
Avatar
Anonymous (Member)
Guru


Messaggi: 1059
Iscritto: 30/07/2006

Segnala al moderatore
Postato alle 13:58
Venerdì, 22/06/2007
;)

Grandioso!!!!!!
grazie mille!

PM Quote