怎样检索鼠标在桌面上的位置(50分)

  • 主题发起人 主题发起人 cool586
  • 开始时间 开始时间
C

cool586

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样检索鼠标在桌面上的位置
 
getcursorpos,获得鼠标相对于桌面窗口的坐标,应该就是你说的桌面上的位置:)
 
procedure TForm1.Button1Click(Sender: TObject);
var
pt:tpoint;
begin
GetCursorPos(PT);
edit1.text:=inttostr(pt.x)+','+inttostr(pt.y)
//鼠标在整个屏幕上的位置
end;
 
来晚了,同意
 
agree Brave
 
多人接受答案了。
 
后退
顶部