功能：通过窗口句柄来发送窗口消息
LRESULT SendMessage(
  HWND hWnd,      // 目标窗口句柄 在这里由FindWindow获取
  UINT Msg,       // 发送消息类型 WM_LBUTTONDOWN WM_LBUTTONUP
  WPARAM wParam,  // 这个我们用不着
  LPARAM lParam   // 这个是鼠标点击 窗口的坐标 高位是Y，低位X
 );              
//鼠标软模拟：好处就是不会真的移动鼠标  开始按钮坐标X：383，Y：387；0183017F
 sendmessage(hookHwnd,messages.WM_LBUTTONDOWN ,0,$XY);// 按下鼠标左键
 sendmessage(hookHwnd,messages.WM_LBUTTONUP  ,0, $XY); //弹起鼠标左键
shellexecute(0,'open',pchar('C:Program FilesInternet ExplorerIEXPLORE.EXE'),pchar(edit3.Text),0,sw_showmaximized);
  sleep(8000);
  x:=   strtoint(edit1.Text);
  y:=   strtoint(edit2.Text);
  SetCursorPos(x,y);
  Mouse_Event(MOUSEEVENTF_LEFTDOWN,X,Y,0,0);
  Mouse_Event(MOUSEEVENTF_LEFTUP,X,Y,0,0)