1
16cy
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm2.Button2Click(Sender: TObject);<br>var<br>I:integer;<br>begin<br>for I := 0 to 20 do<br>begin<br>sendmessage(hnd,WM_MOUSEMOVE,20*I,20*I);<br>end<br>end;<br><br>end.<br><br>这个函数,可以往其他窗口(句柄hnd)发送鼠标移动的消息,可是却只能往x方向移动,不知何故?