Home » Tipps & Tricks » Netzwerk/Internet » Internet » Feststellen, ob eine Verbindung zum Internet besteht

Feststellen, ob eine Verbindung zum Internet besteht

Die folgende Funktion prüft, ob der Computer online, d.h. mit dem Internet verbunden ist.Dabei bedient sie sich der Funktion InternetGetConnectedState.

uses
  WinInet;

function IsOnline: Boolean; 
var 
  dlvFlag : DWord; 
begin 
  Result := False;
  dlvFlag := Internet_Connection_Modem or Internet_Connection_Lan or Internet_Connection_Proxy; 
  if InternetGetConnectedState(@dlvFlag, 0) then 
    Result := (dlvFlag = 81); 
end;

Hinweis:Es ist nicht immer möglich, zu prüfen, ob eine Verbindung zum Internet besteht.Unter gewissen Voraussetzungen kann die genannte Funktion trotzdem zum Erfolg führen. Es sei hier aber ausdrücklich erwähnt, dass das nicht auf allen Systemen und Konfigurationen funktioniert.Der Grund dafür kann hier nachgelesen werden.