Internetverbindung prüfen

[Major1337]

Hey,

mein Programm hat einen Online und Offline Modus. Ich möchte diese Function gerne in mein Programm einbauen, aber was muss ich tun, dass diese Function sozusagen die ganze Zeit läuft und jedes mal schaut ob die Connection da ist, falls nicht soll er dann direkt in den Offline Modus springen.

Delphi-Quellcode:

function IsInternetConnected: Boolean;
begin
  if InternetGetConnectedState(nil, 0) then
  begin
    Result := True;
  end
  else
  begin
    Result := False;
  end;
end;

[freak4fun]

Delphi-Quellcode:

function IsInternetConnected: Boolean;
begin
  Result := InternetGetConnectedState(nil, 0);
end;

Deine Funktion geht nicht?

[Sherlock]

Hmmm, da gab es doch mal ne fruchtbare Diskussion dazu:
http://www.delphipraxis.net/internal...t.php?t=146045

Sherlock

[Klaus01]

Zitat:

Wenn der InternetGetconnectionState -Funktionsaufruf true zurückgibt, ist eine Netzwerkverbindung vorhanden. Allerdings garantiert dies nicht, dass Sie Zugriff auf Daten verfügen oder dass Sie Zugriff auf Websites über das Netzwerk haben.

Quelle

Wenn Du das permanent überprüfen willst, kannst Du das in einem Thread oder mit einem Timer lösen.

Grüße
Klaus

[Progman]

Zitat von Klaus01:

Zitat:

Wenn der InternetGetconnectionState -Funktionsaufruf true zurückgibt, ist eine Netzwerkverbindung vorhanden. Allerdings garantiert dies nicht, dass Sie Zugriff auf Daten verfügen oder dass Sie Zugriff auf Websites über das Netzwerk haben.

Quelle

Wenn Du das permanent überprüfen willst, kannst Du das in einem Thread oder mit einem Timer lösen.

Grüße
Klaus

Dazu sollte man anmerken, dass, wenn ständig die Internetverbindung überprüft wird, es passieren kann, dass viele Virenscanner das Programm als Trojaner "erkennen". Ist jedenfalls meine Erfahrung. Solange man es nur selbst nutzt, ist das kein Problem. Aber bei Weitergabe eines solche Programms kann das schon ärgerlich werden