Ermitteln, ob PC im Netzwerk online ist

[MCeddy]

Hallo, ich arbeite gerade an einem Programm, mit dem man über Netsend Nachrichten versenden kann. Um es noch komfortabler zu machen bräuchte ich noch eine Funktion, die überprüft, ob ein PC, deren IP natürlich eingegeben wurde auch tatsächlich online ist. Wie kann ich das genau in Delphi machen? Hab mir schon überlegt das Ganze über den Ping zu regeln, aber wie soll das gehn (z.B. mit den Winshoes-Komponenten - habe nämlich noch Delphi 3 drauf )?

mfg und schönen Abend noch

MCeddy2002

[APP]

Hallo,
schau mal in der Codelibrary nach:
Besteht eine Netzwerk - Verbindung

[CalganX]

Hi und herzlich Willkommen in der Delphi-PRAXiS!

Als erste Möglichkeit würde ich vorschlagen einfach die IP anzupingen.
Ping und ICMPSendEcho

Chris

[APP]

Hallo MCeddy02,
Sorry, habe zu schnell gelesen, Chris' Vorschläge sind besser

[Christian Seehase]

Moin MCeddy,

erst einmal herzlich willkommen hier in der Delphi-PRAXiS.

Such hier doch mal nach IcmpSendEcho.
Damit lässt sich das machen, völlig ohne Komponenten.

Allerdings würdest Du so nur herausbekommen, dass der Rechner angeschaltet ist.
Ob ein Betriebbsystem aktiv ist lässt sich damit nicht ermitteln.

[MCeddy]

Hallo, vielen Dank euch allen für eure super Tipps. Es klappt nun endlich , mit dem ICMPSENDECHO Befehl (ohne zusätzliche Kompunenten) und der Funktion von hier. Hatte am Anfang zwar noch kleinere Schwierigkeiten, die Funktion so anzupassen, das sie unter Delphi 3 auch läuft. Aber wenn man anstatt LONGWORD LONGINT nimmt geht's auch. Habe auch noch wie ein verrückter im Netz die Prozedur TranslateStringToTInAddr gesucht und sie hier gefunden.

viele Grüße
MCeddy2002

PS: Dieses Board ist super