雀 雀巢 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-03 #1 昨天类似的提问中，各位给的答案只能在当前窗口或控件中添加 不能精确到鼠标当前停留的位置，我希望是能在鼠标停留的位置能够添加图片 如果能提取鼠标当前位置更好 只有45分了～55～
飞 飞机 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-03 #2 要知道鼠标的当前位置可以使用 好像是GetMousePos() 要不就是GetCursorPos(),记不清楚了
硬 硬木花椒 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-03 #3 public: procedure wmlbuttonup(var msg:twmlbuttonup);message wm_lbuttonup; procedure tform1.wmlbuttonup(var msg:twmlbuttonup); begin showmessage('你按下了鼠标左键！'#13#10'横坐标:'+inttostr(loword(msg.XPos))+'纵坐标:'+inttostr(loword(msg.YPos))); end; 鼠标当前位置
public: procedure wmlbuttonup(var msg:twmlbuttonup);message wm_lbuttonup; procedure tform1.wmlbuttonup(var msg:twmlbuttonup); begin showmessage('你按下了鼠标左键！'#13#10'横坐标:'+inttostr(loword(msg.XPos))+'纵坐标:'+inttostr(loword(msg.YPos))); end; 鼠标当前位置
