Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Alle angeschlossenen USB-Geräte auflisten? (https://www.delphipraxis.net/13523-alle-angeschlossenen-usb-geraete-auflisten.html)

thomasdrewermann 20. Dez 2003 12:48


Alle angeschlossenen USB-Geräte auflisten?
 
Hi,
vor einer Woche ist mir ein sogeannter "Bei Google suchenMSI Smartkey" in die Hände gefallen. Leider funktioniert die Schutz-Funktion per BIOS nur mit einem spezial-MSI-Mainboard.

In Windows wird er aber als USB-Gerät erkannt und als HDI-Gerät in den Gerätemanager eingeordnet.

Daher könnte man ja ganz einfach abfragen, ob er eingesteckt ist, um dann ein Programm zu schreiben, welches den Computer sperrt, wenn man ihn wieder abzieht.

Darum meine Frage:
Hat jemand eine Idee, wie ich alle angeschlossenen USB-Geärte mit Seriennummer mit einem Delphi-Programm auflisten kann?


MFG und Danke im Voraus
Thomas

Robert Marquardt 20. Dez 2003 13:07

Re: Alle angeschlossenen USB-Geräte auflisten?
 
Alle angeschlossenen USB-Geraete aufzaehlen ist garnicht so einfach.
Eigentlich unmoeglich.
Man kann nur die zu einer Klasse gehoerenden Geraete aufzaehlen.
Die Klasse ist durch eine GUID definiert.

Ich arbeite ueber Weihnachten an meiner USB-Komponente.
Fuer die Einarbeitung in die Thematik besorge dir am besten meine HID-Komponente.
http://www.delphi-gems.com/controls.php
Die nuetzt dir zwar nichts bei diesem konkreten Problem, aber meine USB-Komponente
wird ganz aehnlich gestrickt sein.

thomasdrewermann 20. Dez 2003 15:21

Re: Alle angeschlossenen USB-Geräte auflisten?
 
DANKE!

Das war ein Volltreffer.
Mit der Jedi-Komponente kann ich erfassen, ob mein Key angesteckt ist, weil man die Seriennummer auslesen kann.

MFG
Thomas

Robert Marquardt 20. Dez 2003 18:25

Re: Alle angeschlossenen USB-Geräte auflisten?
 
Wenn du die Jedi VCL installiert hast dann kann die standalone HID-Komponente nicht mehr installiert werden.
Am besten ueberschreibst du JvHidControllerClass.pas in der JediVCL mit dem File aus der Standalone-Version.
Die beiden sollten jederzeit austauschbar sein.
Bei der JVCL 3 aus dem CVS ist das nicht noetig.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:55 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