Delphi2010内提供了一组手势控件，用于完成手势识别的功能，本文即做了一个简单的Demo，演示了如何使用手势控件。

首先新建一个VCL Form Application，在生成的窗体上放置GestureManager和ActionList各一个


双击ActionList，在其中添加两个Action


为这两个Action编写执行代码，它们将在感知到手势动作时被执行，并以对话框形式弹出执行的手势名称


切换视图到Form1，找到Touch属性，展开后，将GestureManager属性关联到GestureManager控件


在上图中，鼠标放到Gestures属性上，右边会出现一个按钮，点击之，在弹出的窗口中，可以设置要响应的手势，并为手势添加Action


如红框标出的那样，在需要响应的手势前打勾，并且在左边的Action属性中，关联到刚才写好的Action
此处只截了DownRight手势的图，另一个手势的添加方式与之相同。

随后，为了使程序执行时，能看到鼠标划过的痕迹，并更好的指导手势的去向，我们使用王胜波(swish)大侠写的GestureTracker，由衷的感谢他提供了这么好的代码（这份代码可以在CodeGear-cn下载到，点击进入），引用该单元后添加一句代码即可


到此为止，就可以编译并运行程序了，手势控件的演示也到此结束

再说个题外话，刚才演示的是系统内置的标准手势，在实际的应用中，用户可以添加自己的手势，并且响应它。如图所示，添加自定义的手势一样很方便