delphi_多种鼠标模拟方式//4种方法模拟ifcombobox2.ItemIndex=0thenbegin//1、发送窗口消息Message//lparam高16位是y低16位是x算法就是x+y左移16位//lparam:=p1.X+p1.Yshl16;sendMessage(WinHandle,WM_LBUTTONDOWN,MK_LBUTTON,MAKELPARAM(p1.X,p1.Y));//鼠标按下sleep(40);sendMessage(WinHandle,WM_LBUTTONUP,MK_LBUTTON,MAKELPARAM