Ergebnis der Suchanfrage

• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 30. Sep 2004
  Also ich hab XP SP2 und es funktioniert ohne Probleme. Unter 2000 SP3 lief es auch (glaub ich jedenfalls). Nur unter 98/ME läuft es nicht. Aber mit SP4 für 200 probier ich nochmal.
  
  Das ganze kommt ja aus der sensapi.dll. Schau mal was du für ne Version hast
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  :wall: Mein Fehler
  procedure TForm1.Button2Click(Sender: TObject);
  var QOCInfo: TQOCInfo;
  begin
  Memo1.Clear;
  QOCInfo.Size := 16; //Bitte das einfügen
  if CheckBox1.Checked then
  if Edit1.Text <> '' then
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Und ich dachte schon es liegt an mir :mrgreen:
  
  Hab jetzt 3 XP Rechner und 1 Server 2003 ausprobiert. Funktioniert tadellos ,außer beim Server das IsDestinationReachable. Warum weiß ich noch nicht.
  
  Ich warte weiter auf Berichte, vor allem nicht-XP-User :hi:
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  :wall: ach menno :cry:
  
  Hast du vielleicht mehr als eine Netwerkkarte?
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  So, ich hoffe mal dass wir es jetzt geschafft haben. :zwinker:
  
  Also die Erkennung läuft über IsNetworkAlive.
  Kommt ohne Verzögerung. Systemlast ist minimal.
  Genauso wollte ich das :-D
  
  Projekt ist wieder anbei. Ich bitte wie immer um Berichte von Nicht-XP-Usern :wink:
  
  Danke
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Na auf das A muss man erstmal kommen. Danke :-D
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Ähm, hab ich jetzt 'nen Denkfehler? Weil wenn ich
  
  function IsDestinationReachable(Destination: String): BOOL; stdcall;
  external 'sensapi.dll' name 'IsDestinationReachable';
  
  einbinde, sagt mir Delphi, "der Prozedureinstiegspunkt wurde nicht gefunden". Aber laut MSDN heißt die Funktion doch so.
  
  Ich dreh hier gleich durch :wall:
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Warum? Bei mir funktionierts :gruebel:
  
  Reaktionszeit < 1 Sekunde :-D
  
  PS: Danke nochmal für die Dateien und den Code
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Also ich hab deine genommen :?
  
  Aber vielleicht liegt es ja noch an der DLL? Kannst du deine mal noch mit posten?
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  @DafOx: hast du schonmal damit gearbeitet? Wollte gerade die Sensapi.dll einbinden, aber Delphi brachte mir eine Fehlermeldung, dass es nicht ginge ("Fehler beim Laden der Typbibliothek/DLL").
  Hab ich vielleicht was übersehen? :?:
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Leider benötige ich die Info sofort (ok 5 Sekunden Tolleranz), da ich sofort reagieren möchte/muss, wenn die Verbindung verloren geht.
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 12. Jul 2004
  Ich muss dich leider enttäuchen :cry: , aber nachdem ich deine Typenbibliothek installiert habe bekomme ich immer noch alle Informationen von XP. Durch die importierte TLB stelle ich ja eine Verbindung zu der DLL dar, über Funktionen. Also eine Schnittstelle. Diese sind im allgemeinen gleich geblieben (die von mir benötigten haben sich nicht geändert). Aber die Eigenschaften, die ich abrufen...
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 11. Jul 2004
  Ist auf jeden Fall ein gutes Argument, nur leider ist das bis jetzt die "sicherste" und "zuverläsigste" Lösung die ich gefunden habe. Ich weiß dass es noch viel 98/ME-User gibt, dehalb habe ich versucht Funktionen zu nehmen, die auch von diesen unterstützt werden. Mir macht das nix aus unter XP. Aber ich will ja dass mein Prog erstmal auf jedem Windows läuft. Leider kann ich das im Moment nicht...
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 11. Jul 2004
  So hab mich nochmal rangesetzt und was geändert.
  
  Hab jetzt Funktionen genommen, die rein theoretisch unter allen Windows-Versionen laufen sollten, vorausgesetzt WMI ist installiert.
  
  Bugs, Kritik und Verbesserungsvorschläge nehme ich gerne entgegen.
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 11. Jul 2004
  War gerade auf der MSDN Seite und laut der ist WMI in ME, 2000 und XP standardmäßig dabei. Nur bei 98, 95 und NT gibt's extra Downloads
  
  
  
  Aber probier doch mal die WMI Tools.
  Wenn die laufen starte mal den WMI Object Browser (geht nur mit IE :evil: ) und schau mal unter Win32_SystemDevices.PartComponent -> Win32_NetworkAdapter. Du erhälst da eine Übersicht über alle NetDevices. Rein...
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 11. Jul 2004
  Hmm, hab gerade gesehen dass es NetConnectionID erst ab XP gibt. Da ich kein Win98/ME mehr habe, wäre es schön wenn vielleicht jemand für diese Windows-Versionen was findet.
  Die Funktionen von Win32_NetworkAdapter findet ihr hier
  
  
  @novabeat:
  kannst du mir bitte eine genaue Fehlerbeschreibung geben. An welcher Zeiler hängt es unter ME, etc?
  
  Danke
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 10. Jul 2004
  Hab's geschafft! Nach langem hin- und her hab ich die WMI zum laufen bekommen. Es werden jetzt alle Netzwerkadapter ausgegeben, die auch in "Netzwerkverbindungen" stehen, deren MAC-Adresse und Status (Connected/NOT Connected).
  
  Probiert es mal bitte unter anderen OS als XP/SP1 aus und postet mal die Resultate.
  
  
  unit UNetWMI;
  
  interface
  
  uses
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 8. Jul 2004
  Leider nein :?
  
  Mir geht es ja um die lokale IP und keine Interneteinwahl.
  
  Aber nochmal zur Überlegung. Was soll angezeigt werden?
  
  Alle Netzwerkverbindungen
  Deren jeweiliger Status (z.B. LAN verfügbar, Adresse xyz, WLAN nicht verfügbar, 1394 nicht verfügbar/deaktiviert,...)
• Forum: Netzwerke

  Re: Feststellen, ob Netzwerkkabel gezogen wurde?

    Delphi
    by djmasi, 8. Jul 2004
  Hatte mich auch schon mit dem Thema rumgeärgert. Die Sachen mit Registry und MAC Adresse fallen raus, da das mit der Reg auf jedem Windows unterschiedlich ist und die MAC bei Entfernen des Kabels erhalten bleibt.
  
  Habe aber gerade etwas gefunden bei delphi3000.com.
  
  bin mal so frei und liste den verwendeten Code:
  
  
  unit Unit1;
  
  interface