Na gut, dann passt die setupapi.pas wohl tatsächlich nicht zum Beispielcode. Du könntest den Kaktus ja einmal bitten, Dir seine verwendete Version zu schicken.
okay hab ihm geschrieben,mal sehen, hat denn eventuell jemand noch einen anderen Code parrat mit dem ich 4 buttons machen kann, 1 zum aktivieren , 1 zum deaktivieren, 1 zum geräte suchen, 1 zum auflisten der usb ports ??
mache ich vielleicht auch einen falschen Aufruf?
SetupAPI ist Teil der JCL (
Jedi-
VCL)..
des weiteren hast Du etwas falsch verstanden!!!..ich schrieb
das ... sollte heissen...nach !!! dem Programm-Kopf(header)
also nach
Delphi-Quellcode:
Program test1;
uses System, Forms........;
var
Form1: TForm1;
implementation
{$R *.dfm}
Uses SetupAPI;
Auch war es nur ein Beispiel!!! um die Art und Weise zu erklaeren...deshalb auch die Kommentare
Delphi-Quellcode:
// state disable setzen
...
// Devices listen
ein bisschen musst Du schon noch nachdenken..sorry!!!!
P.S.: ich habe ebenfalls D7 und es funktioniert Prima
Die Geraetebezeichnung "Universal Host Controller" entsprach auch damals meinem Problem..muesstest Du kontrollieren, ob es unter Windows 7 auch so heisst!!