捕获鼠标在设计时输入/离开

时间:2013-07-11 19:44:00

标签: delphi

我在设计时捕获TCustomPanel组件的鼠标事件时遇到了一些困难。我试过了 CMDesignHitTest返回Message.Result := 1。它可以在鼠标进入组件时捕获,但无法感知鼠标何时离开。我也试过搞乱组件样式,但这根本不起作用。我理解(从我在Web上收集的内容),在Message.Result := 1事件上返回CMDesignHitTest之后,组件捕获了所有鼠标事件,但它似乎不适用于标准{{1 } / OnMouseEnter个事件。我想知道是否有人可以给我一个关于这个问题的工作样本。我非常感谢。

1 个答案:

答案 0 :(得分:2)

作为测试,请尝试为WM_NCHITTEST消息添加处理程序,并确保在Message.Result标志启用时HTCLIENT设置为csDesigning ComponentState财产。我看到一些在线文章建议HTCLIENT需要CM_DESIGNHITTEST才能正常工作。