Delphi - 模拟点击动画

0 delphi mouse animation click

这是我在stackoverflow上的第一篇文章,请原谅我做错的事.

我在没有任何计算机知识的情况下为用户提供了一种指导,我向他展示了如何使用它,通过指示他应该做什么,更具体地说是在哪里点击.我希望通过将"假"光标移动到按钮并模拟点击,这就是我遇到问题的地方,我必须模拟点击的动画,而不是事件本身但我找不到一种方法,任何人都可以帮助我吗?

Rob*_*edy 9

你所描述的正是WH_JOURNALPLAYBACK为了什么.它使用您想要发生的鼠标和键盘消息填充消息队列,操作系统会解释它们.在您的情况下,激活播放挂钩并执行执行单击所需的鼠标事件.

在准备中,您可能希望WH_JOURNALRECORD用来发现您需要的消息.一旦拥有它们,您可以在将产品发送给客户之前将它们缩小到合理大小的列表.(特别是,你可能会录制比实际需要更多的鼠标移动消息.)

在按钮的单击处理程序中,检查播放是否处于活动状态.仅在播放激活时才执行事件处理程序的其余部分.这样,您的程序就会像点击按钮一样(包括任何动画),但它不会执行真实的事件代码.