EjectUSB.pass

delphi下USB设备及U盘弹出代码。修改了网上下载的代码加入了用U盘符弹出设备的函数function SafeRemoveUDisk(DriveLetter: Char; bTips:Boolean):Integer; //可用盘符弹出U盘
pas 文件大小:49.62KB