编程论坛 → Delphi论坛

[求助]窗体的 on click 事件

小茶发布于 2006-05-26 10:12， 867 次点击

我想让鼠标在窗体上任意一处点击时执行某项操作,是在窗体的 on click 事件中添加代码吗?

3 回复

xu20002006-05-26 10:14

对呀！！

coldwave2006-05-28 13:30

窗体上有label或image时这些区域就不响应form的onckick

wzw2002006-06-13 00:16

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);

begin //双击鼠标左键使屏幕最大化

if Msg.message =WM_LBUTTONDBLCLK then
begin
if DDclick=true then
begin

Msg.message =（WM_LBUTTONDBLCLK）这个消息你查一下就OK了用这个控件ApplicationEvents onmessage的事件写就OK