根据盘符获取硬件编号

1. unit USBLib;
2. //----------------------------------------------------------------------------
3. //                                                                            
4. //                               根据盘符获取硬件编号                         
5. //调用方法：                                                                  
6. //  GetHardwardIDs(X) * X表示盘符                                             
7. //                                                                            
8. //返回内容格式(最后一段是序列号)：                                            
9. //  USB/VID_0ED1&PID_6680/5&731544B&0&1                                       
10. //                                                                            
11. //参考资料                                                                    
12. // 1、VC 如何获得U盘的详细信息                                                
13. //      http://blog.csdn.net/jakeyjia/archive/2006/12/01/1424111.aspx         
14. // 2、VB 卸载USB设备/解锁文件收藏                                             
15. //    http://blog.csdn.net/chenhui530/archive/2007/12/13/1932917.aspx         
16. // 3、MSDN Library for Visual Studio 2005                                     
17. //                                                                            
18. //编译环境：                                                                  
19. //  1、本单元使用了jcl代码库中的Setupapi及CfgMgr32单元                        
20. //     http://sourceforge.net/projects/jcl/                                   
21. //     http://jvcl.sourceforge.net/                                           
22. //  2、Delphi 7.0                                                             
23. //