USB-Ports deaktivieren&aktivieren in Delphi 7

[sneumann]

Zitat von DeddyH:

Und wo wird da SetupAPI eingebunden?

achso ja jetzt habe ich noch uses setupapi hinzugefügt trotzdem folgende fehlermeldungen

Code:

[Warnung] main.pas(32): Unsicherer Typ 'HDEVINFO'
[Warnung] main.pas(47): Unsicherer Typ 'hdev: Pointer'
[Warnung] main.pas(47): Konstante 0 wurde zu NIL konvertiert
[Warnung] main.pas(47): Konstante 0 wurde zu NIL konvertiert
[Warnung] main.pas(48): Unsicherer Typ 'hdev: Pointer'
[Warnung] main.pas(57): Unsicherer Typ 'hdev: Pointer'
[Warnung] main.pas(59): Unsicherer Typ 'hdev: Pointer'
[Warnung] main.pas(60): Unsicherer Code '@ operator'
[Fehler] main.pas(60): Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen
[Warnung] main.pas(60): Unsicherer Code '@ operator'
[Fehler] main.pas(60): Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen
[Fehler] main.pas(67): Undefinierter Bezeichner: '_SP_CLASSINSTALL_HEADER'
[Warnung] main.pas(73): Unsicherer Typ 'hdev: Pointer'
[Warnung] main.pas(73): Unsicherer Code '@ operator'
[Warnung] main.pas(75): Unsicherer Typ 'hdev: Pointer'
[Warnung] main.pas(82): Unsicherer Typ 'hdev: Pointer'
[Fataler Fehler] usbtest.dpr(5): Verwendete Unit 'main.pas' kann nicht compiliert werden