UC知道delphi 单双击事件
来源：百度知道 编辑：UC知道 时间：2024/06/13 05:06:31
在窗体中单击或双击会出现一定的提示信息，我看到的一个程序时这样的，
procedure TForm1.Formclick(Sender: TObject);
begin
label1.caption:='单击';
end;
procedure TForm1.Formdblclick(Sender: TObject);
begin
label1.caption:='双击';
end;
但是运行后，没有任何反应，为什么？
问了下经理，知道问题出在哪了 不过谢谢大家·~呵呵
procedure TForm1.Formclick(Sender: TObject);
begin
label1.caption:='单击';
end;
procedure TForm1.Formdblclick(Sender: TObject);
begin
label1.caption:='双击';
end;
但是运行后，没有任何反应，为什么？
问了下经理，知道问题出在哪了 不过谢谢大家·~呵呵
代码没有问题啊。。。我这边都运行正常啊。
忽悠人的，根本没有，是人捏造的
这个程序时正确的！！！
但问题是你调试成功没，
在对象监视器里面建立单击和双击的事件没~？？
我刚调试过，绝对正确！
你看下Form的事件有没有注册这两个方法，没问题的话是可以实现效果的