【文件属性】：
文件名称：0611检测usb设备信息.zip
文件大小：214KB
文件格式：ZIP
更新时间：2020-08-05 19:21:22
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