VC编写的变色龙按钮程序，有兴趣的可以研究下

COM组件调用方法： 首先 运行 “注册USBPass组件.bat” ，在系统中注册USBPassW.dll 和 USBPassR.dll 1>在VB6.0的调用 打开一个工程 菜单->工程->引用-> 在打开的窗口中 选择“USBPass-Write (基于U盘的授权系统 V3.0)”和“USBPass-Write (基于U盘的授权系统 V3.0)” 然后可按照Demo中的方式使用。 2>在Delphi7的调用