捕抓鼠标离开的事件(21分)

N

nomad_heart

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-27

• #1

我用三张图片想实现一个按钮的效果：
mouseUp和mouseMove时用一张；
mouseDown时用一张；
鼠标离开的时候用一张。
可以没有mouseLeave事件。怎么做？
（就怎么多分了，sorry ^*^）

 

X

XWHope

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-27

• #2

用mousemove
判断鼠标x，y范围

 

Z

zhangxian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-27

• #3

用DELPHI的CM_MOUSELEAVE消息

 

L

lipeng2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-27

• #4

procedure CMMouseLeave(var Message: TMessage); message CM_MouseLeave;
procedure TForm1.CMMouseLeave(var Message: TMessage);
begin
inherited;
end;

 

W

wn569

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-29

• #5

可以用delphi消息机制啊
uses
controls；
procedrue CM_MOUSELEAVE(VAR MSG:TMESSAGE):message CM_MOUSELEAVE;
BEGIN
Your code;
inherited;
end;