Delphi读取Usb设备所属端口

        笔者近期做的项目，要求能够读取到Usb设备连接电脑的端口序号。usb设备指Android平板、手机等类似安卓的设备。设备通过UsbHub连接到电脑上也需要能够读取。类似Windows设备管理中的“位置路径”，如下图所示：

        尝试了很多种方法，比如：WMI、SetupApi、注册表等，都以失败告终。都只能读取到一些基础的设备信息，始终无法获取到具体哪个端口。后来在注册表中翻找的过程中，发现某一项：LocationInfo与设备管理中的“位置路径”完全一致，通过分析总结出得到此信息的方法，却：

        1、先通过设备标识找到注册表项：HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USB\VID_0B05&PID_7773\FBNPFP142270

        2、在其下面找到子项：ParentIdPrefix，内容为：7&3865104f&1

        3、再找到注册表项：HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USB\VID_0B05&PID_7773&MI_00\7&3865104f&1&0000

        4、在其下面找到子项：LocationInformation，得到内容为：0000.0014.0000.001.003.004.000.000.000

将上面的值内容与图片中的“位置路径”对比，发现完全一致。