如何在控件上同时实现单击和双击(20分)

K

kane

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-04-15

• #1

每次双击都被单击屏蔽了,气死我了

 

J

jghuang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-04-15

• #2

没有,是不是在用showmessage()调试啊?
它会暂停程序,怎还能产生双击事件呢?

 

K

kane

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-04-15

• #3

我用了这个程序来代替

procedure TForm1.FormClick(Sender: TObject);
begin
Label1.Caption:='Click';
end;

procedure TForm1.FormDblClick(Sender: TObject);
begin
Label1.Caption:='DBClick';
end;

当我双击时,Label1的Caption总会先出现Click然后再出现
DBClick,这虽然单击没有把双击屏蔽,但是还是触发了OnClick
事件,是不是双击的事件只能继承单击的事件啊

 

S

shuhua87

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-04-16

• #4

从Windows Message上看:
WM_RBUTTONDBLCLK总是随同WM_RBUTTONDOWN,WM_RBUTTONUP产生的,且总是处在第三条消息

 

K

kane

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-04-16

• #5

多人接受答案了。