说明：  delphi7编程实现控制电脑摄像头闯入拍照，初步实现了摄像头动作识别。使用时，根据自己的摄像头适当修改ColorComp函数中的Distance常量，和图片相似度sm>=95这两个参数。自己测试了一下，还可以。只是一个粗糙的实现，没有优化，还需要大家继续努力。有修改更好的，记得给我email一个。
(Delphi7 programming to control computer cameras to break into the camera, the initial realization of the camera action recognition. When using, the Distance constant in the ColorComp function is properly modified according to your own camera, and the two parameters of the picture similarity degree are sm>=95. I've tested it and you can. Only a rough realization, no optimization, and we need to continue to work hard. There is a better change, remember to give me email one.)