Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Online oder offline? (https://www.delphipraxis.net/3445-online-oder-offline.html)

Pyr0cracker 13. Mär 2003 09:03


Online oder offline?
 
ich hab schon mit verschiedenen routinen versucht zu prüfen ob der computer mit dem internet verbunden ist, hab windows xp und wenn ich ihn gestartet habe und offline bin zeigt das prog das auch an, wenn ich nun online gehe ueigt es das auch an, wenn ich aber wieder offline gehe sagt das prog mir ich wäre immer noch online, weiss jamand woran das liegt? oder is winxp einfach zu doof?
PS: habs mit indy ipcheck und mit wininet komponenten ausprobiert.

zur info fürs prog, solln internetkostenzähler werden...

ciao,

Darty 13. Mär 2003 09:29

Kannst nicht mal Deine "Abfrage" posten ? Dann kann man sicher weiterhelfen ..

Mirilin 13. Mär 2003 10:56

Aus der EDH2000:

Zitat:

Offline oder Online?


Es kursieren viele Möglichkeiten im Netz, um festzustellen ob ein Rechner online oder offline ist. Meistens wird nur getestet, ob der Computer eine IP-Adress zugewiesen bekommen hat. Aber wenn auf dem Computer eine Netzwerkkarte installiert ist, klappt das ganze nicht.

Hier eine Lösung, die immer funktionieren sollte, wenn sich der Rechner übers DFÜ-Netzwerk eingeloggt hat:
Delphi-Quellcode:
uses WinInet;

procedure TForm1.Button1Click(Sender: TObject);
begin
  If InternetGetConnectedState(nil, 0) then
    Caption := 'Online'
  else
    Caption:='Offline';
end;

Pyr0cracker 13. Mär 2003 12:37

die methode hab ich auch schon probiert,geht aber nich. hab natürlich auch edh2000 ;)
hmm, mal sehen, ich werde mal googlen...

Mirilin 13. Mär 2003 13:19

Moderatoren & Co, bitte löschen, habe falsch gelesen.
:D

Mirilin 13. Mär 2003 13:25

Bei mir geht das auch nicht, aber in der PSDK steht :
Zitat:

InternetGetConnectedState
Retrieves the connected state of the local system.

Delphi-Quellcode:
BOOL InternetGetConnectedState(
  LPDWORD lpdwFlags,
  DWORD dwReserved
);
Parameters
lpdwFlags
[out] Pointer to a variable that receives the connection description. This parameter can be one or more of the following values.

Value Meaning
  • INTERNET_CONNECTION_CONFIGURED Local system has a valid connection to the Internet, but it might or might not be currently connected.
  • INTERNET_CONNECTION_LAN Local system uses a local area network to connect to the Internet.
  • INTERNET_CONNECTION_MODEM Local system uses a modem to connect to the Internet.
  • INTERNET_CONNECTION_MODEM_BUSY No longer used.
  • INTERNET_CONNECTION_OFFLINE Local system is in offline mode.
  • INTERNET_CONNECTION_PROXY Local system uses a proxy server to connect to the Internet.
  • INTERNET_RAS_INSTALLED Local system has RAS installed.

dwReserved
[in] Reserved. Must be zero.
Return Values
Returns TRUE if there is an Internet connection, or FALSE otherwise.

janjan 13. Mär 2003 13:38

Kuck mal hier:
http://www.experts-exchange.com/Prog..._20437207.html

znd hier:
http://www.experts-exchange.com/Prog..._20105243.html

Viel Spaß beim lesen :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:36 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz