高分求程序实现弹出USB设备，如U盘
高分求程序实现弹出USB设备，如U盘


本人也查了相关的资料
http://zhidao.baidu.com/question/31106191
http://blog.csdn.net/goodwinds/article/details/2691879

以上也有人发出了贴，但不完整，请各位高手给出完整的。

[解决办法]
这里有个例子，自己下吧，我试过了，可以弹出U盘！有源码!
http://download.csdn.net/download/wqcw6lf/3803864
[解决办法]
接点分。。。。
[解决办法]
同楼上！
[解决办法]

接分!
[解决办法]

探讨

这里有个例子，自己下吧，我试过了，可以弹出U盘！有源码!
http://download.csdn.net/download/wqcw6lf/3803864

[解决办法]
我用d7....没有问题
[解决办法]
XE的话你要解决里面的Unicode的问题。不然会有乱码的
[解决办法]
我的可以阿，XP，SP3，D7。出现了什么问题？
[解决办法]
至少原来已经编辑好的EXE文件可以运行吧？
[解决办法]
改造了一下树的单击事件：

Delphi(Pascal) code

procedure TForm1.TreeViewClick(Sender: TObject);var  DeviceInfoData: TSPDevInfoData;  Status, Problem: DWord;  VetoType: TPNPVetoType;  VetoName: array[0..256] of Char;begin    DeviceInfoData.cbSize := SizeOf(TSPDevInfoData);    // Get a handle to the Selected Item.    if (not SetupDiEnumDeviceInfo(DevInfo, TreeView.Selected.Index, DeviceInfoData)) then    begin      exit;    end;    self.Caption :=IntToStr(DeviceInfoData.DevInst);end;