谁能给我解释这个问题(关于响应消息)，60分！

Question

to outer2000(天外流星): 左键为何不行？

Answer 1

procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  P.X:=X; P.Y:=Y;
  if ((X>0)and(X<682)) and ((Y>2)and(Y<640)) then
    SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MINIMIZE, 0);
end;

Answer 2

因为缺省右键DOWN弹出菜单，所以缺省设为右键！

Answer 3

DELPHI把鼠标的DOWN操作缺省设置为右键，因为左键通常行为是CLICK；而右键常用DWON操作（用于弹出菜单）

Answer 4

to nickw(nickw): 坐标不会出问题的
to  wr960204(武稀松): 为什么MouseDown事件里不行呢，没人知道吗？

Answer 5

to nickw(nickw): 好像有点道理，但我这样怎么又可以呢procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Caption := 'asdfasdf';
end;
按下左键，系统能接收到Caption := 'asdfasdf';

Answer 6

我试过了，如果是按钮没问题！检查一下你的DELPHI环境设置

Answer 7

跟踪一下程序的执行，看点左键是否进入DOWN过程。

Answer 8

检查一下你的DELPHI环境设置？难道我的配置有问题

Answer 9

我跟踪了，左键进入了DOWN过程

Answer 10

这真是个问题，我试验了一下。
在MouseDown中加一条ShowMessage('')就可以。
定义一个全程变量I，MouseDown中设为10，Click中设为100。
另外加个Button查看它的值。发现，鼠标点下去再松开，完成了一个Click，
所以I=100；如果点下去不松开I=10，松开后，由于没有完成一个Click，还是10。

Answer 11

将sendmessage(...)该为 showwindow(application.handle,SW_MINIMIZE);即可解决你的问题.
可能因为image不是一个TCONTROL组件,所以SENDMESSAGE()不起作用.