如何判断鼠标在指定窗体里按下鼠标左键?在线等!!(100分)

魔鬼大师 · 2006-09-26

这段代码可以得到在该窗口是否按下了左键

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;  Shift: TShiftState; X, Y: Integer); begin  if Button=left  begin    ShowMessage('left btn press');  end; end;

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

rRect := Form.Rect;  if (X > rRect.Left) and (X < rRect.Right)    and (Y > rRect.Top) and ( Y < rRect.Bottom) then  begin    ShowMessage('Ok');  end;

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

那还不简单：  if Msg.message = WM_LBUTTONDOWN then  if (X > rRect.Left) and (X < rRect.Right)    and (Y > rRect.Top) and ( Y < rRect.Bottom) then  begin    showmessage('left btn pressed')  end;

夫罗多 · 2006-09-27

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

rRect := btn5.Rect;  if (X > rRect.Left) and (X < rRect.Right)    and (Y > rRect.Top) and ( Y < rRect.Bottom) then  begin    ShowMessage('Ok');  end;

魔鬼大师 · 2006-09-26

rRect := btn5.BoundRect;  if (X > rRect.Left) and (X < rRect.Right)    and (Y > rRect.Top) and ( Y < rRect.Bottom) then  begin    ShowMessage('Ok');  end;

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

就是这么写的

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

if Button=mbleft  then if (X >96) and (X < 128)    and (Y > 122) and ( Y < 145) then  begin    ShowMessage('Ok');  end;

夫罗多 · 2006-09-27

魔鬼大师 · 2006-09-26

我哪有什么DPR，我又不做你这个东东， 你意思可能没表达清楚

魔鬼大师 · 2006-09-26

你语文成绩一定不及格

夫罗多 · 2006-09-26

我是想要一个  完整的监视鼠标在计算器上"5"的位置按下左键的程序代码  只要在5的位置按下左键就ShowMessage() 大哥你这下明白了吗?

tianlove · 2006-09-26

已经很清楚了吧。 if (X >96) and (X < 128)    and (Y > 122) and ( Y < 145) then 以上来确定有效范围，再 if Button = mbLeft then    ShowMessage('Left');  if Button = mbRight then    ShowMessage('Right'); 判断是左键还是右键

如何判断鼠标在指定窗体里按下鼠标左键?在线等!!(100分)

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

魔鬼大师

Unregistered / Unconfirmed

夫罗多

Unregistered / Unconfirmed

tianlove

Unregistered / Unconfirmed

Similar threads