像360 金山一样检查U盘, delphi代码。