Funktion: IsNetworkConnected ??

*..und nochmal nach oben schiebt*

**SirThornberry**

in der Unit "wininet" gibt es die Funktion "InternetGetConnectedState". Die gibt dir den Status der Verbindung zurück.

Delphi-Quellcode:

			function ConnectedToLan: Boolean;

var LWord: DWord;

begin

  LWord := INTERNET_CONNECTION_LAN;

  result := InternetGetConnectedState(@LWord, 0);

end;

genauere Hilfe zu der funktion gibts im msdn MSDN-Library durchsuchen

InternetGetConnectedState

Hallo,

hab's getestet, funktioniert kein bißchen.

**SirThornberry**

habs auch getestet und bei mir funktionierts auch nicht, aber laut msdn sollte es funktionieren.

Hast Du den Anhang mal runtergeladen und es daran getestet?

Naja, zur Zeit hab' ich echt keine Ahnung, was ich noch machen könnte..

*..weiterschiebt*

Morgen,

soweit habe ich jetzt alles (also Betriebssystem wird ermittelt, für XP & 2000 läuft die Funktion).

Jetzt bräuchte ich nur noch eine Funktion, die unter NT und niedriger überprüft, ob der Netzwerkstatus aktiv ist oder nicht.

Weiß jemand Rat?

**Tonic1024**

Moin...

(für meinen Geschmack pushst du zu viel/häufig)

Bringt es dich weiter, wenn du deine eigene IP pingst? Hab das grad getestet und bei mir gings. 127.0.0.1 ging und 192.168.x.x ging nicht nachdem ich mein Netzwerkkabel gezogen hatte.

Die eigene IP kannst du ja ermitteln - ich glaube das Stichwort "Neo.pas" hilft da weiter. musst mal hier im Forum suchen und testen.

MfG

Toni

Hi,

genau das habe ich ja gemacht, aber diese Variante läuft nur unter XP & 2000.

Unter NT und niedriger funktioniert das noch nicht recht.

Welches OS hast Du denn, wenn man fragen darf?

**Tonic1024**

Sorry, hab ich entweder "überlesen" oder nur halb mitgedacht (Montag Morgen halt)

Hab ein 2k System.

Schau mal in der 'Hosts-Datei' ob da u.U. deine IP-Eingetragen ist. Wenn ja, mach sie mal raus und versuchs nochmal. Sollte zumindest Aufschluss darüber geben worans liegt, dass es dort anders ist.

Sollte dort zu Finden sein:
WINNT\system32\drivers\etc\SERVICES

MfG

Toni

Funktion: IsNetworkConnected ??

Re: Funktion: IsNetworkConnected ??

Re: Funktion: IsNetworkConnected ??

Re: Funktion: IsNetworkConnected ??

Re: Funktion: IsNetworkConnected ??

Forumregeln

justify (Gast) n/a Beiträge	#11 19. Jun 2005, 10:22 ..und nochmal nach oben schiebt
	Zitat

justify (Gast) n/a Beiträge	#13 19. Jun 2005, 13:20 Hallo, hab's getestet, funktioniert kein bißchen.
	Zitat

SirThornberry (Moderator) Registriert seit: 23. Sep 2003 Ort: Bockwen 12.235 Beiträge Delphi 2006 Professional	#14 Re: Funktion: IsNetworkConnected ?? 19. Jun 2005, 13:22 habs auch getestet und bei mir funktionierts auch nicht, aber laut msdn sollte es funktionieren. Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
	Zitat

justify (Gast) n/a Beiträge	#15 19. Jun 2005, 13:23 Hast Du den Anhang mal runtergeladen und es daran getestet? Naja, zur Zeit hab' ich echt keine Ahnung, was ich noch machen könnte..
	Zitat

justify (Gast) n/a Beiträge	#16 19. Jun 2005, 20:53 ..weiterschiebt
	Zitat

justify (Gast) n/a Beiträge	#17 20. Jun 2005, 08:28 Morgen, soweit habe ich jetzt alles (also Betriebssystem wird ermittelt, für XP & 2000 läuft die Funktion). Jetzt bräuchte ich nur noch eine Funktion, die unter NT und niedriger überprüft, ob der Netzwerkstatus aktiv ist oder nicht. Weiß jemand Rat?
	Zitat

justify (Gast) n/a Beiträge	#19 20. Jun 2005, 09:05 Hi, genau das habe ich ja gemacht, aber diese Variante läuft nur unter XP & 2000. Unter NT und niedriger funktioniert das noch nicht recht. Welches OS hast Du denn, wenn man fragen darf?
	Zitat