文件名称:0611检测usb设备信息.zip
文件大小:214KB
文件格式:ZIP
更新时间:2023-08-26 13:08:02
delphi usb
delphi 获得usb设备的路径,可以识别usb设备的厂家ID和设备ID. Locator := CreateOleObject('WbemScripting.SWbemLocator'); WMI := Locator.ConnectServer('.', '', '', ''); Ret := WMI.ExecQuery('SELECT * FROM Win32_USBHub');//这里Win32_USBHub为检测项,详见下表 Enum:= IUnknown(RET._NewEnum) as IEnumVariant; ......
【文件预览】:
获取更多硬件信息 usb硬件码.txt
Unit1.ddp
Project1.res
Unit1.dcu
Unit1.dfm
Project1.cfg
Project1.dpr
Project1.exe
Project1.dof
Unit1.pas