关于MouseWheel事件

Question

form的MouseWheel事件有个MousePos参数，我显示MousePos.X发现那是相对于整个桌面的坐标，于是用MousePos.X-Form1.left,那又是相对于整个窗口左上角的坐标。我只想要相对于客户区左上角的坐标，该怎么做？

Answer 1

    Label1.Caption := IntToStr(MousePos.X);
    Label2.Caption := IntToStr(MousePos.y);
    Label3.Caption := IntToStr(ScreenToClient(MousePos).X);
    Label4.Caption := IntToStr(ScreenToClient(MousePos).y);