Delphi - 模拟点击动画

时间:2015-01-30 18:40:38

标签: delphi animation click mouse

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

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

1 个答案:

答案 0 :(得分:9)

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

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

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