zoukankan      html  css  js  c++  java
  • Delphi中Chrome Chromium、Cef3学习笔记(五)

    一、模拟移动鼠标

    转载请注明出处,原文地址:
    http://blog.csdn.net/xtfnpgy/article/details/48489489

    //  SetCursorPos(StrToInt(Edit1.Text),StrToInt(Edit2.Text));  //相对屏幕位置
      SetCursorPos(Self.Left+chrm1.Left+strtoint(Edit1.Text),Self.Top+chrm1.Top+strtoint(Edit2.Text));  //相对Chrm位置


           mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);//模拟按下鼠标左键。

      mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);//模拟放开鼠标左键。


      keybd_event(VK_SHIFT,MapVirtualKey(VK_SHIFT,0),0,0); //按下SHIFT键。
      keybd_event(0x52,MapVirtualKey(0x52,0),0,0);//按下R键。
      keybd_event(0x52,MapVirtualKey(0x52,0),KEYEVENTF_KEYUP,0);//放开R键。
      keybd_event(VK_SHIFT,MapVirtualKey(VK_SHIFT,0),KEYEVENTF_KEYUP,0);//放开SHIFT键。


    二、Chromiume控件指定坐标点击

      SendMessage(GetWindow(GetWindow(form1.chrm1.Handle, GW_CHILD), GW_CHILD),WM_LBUTTONDOWN,MK_LBUTTON, MAKELONG(StrToIntDef(Edit1.Text,100),StrToIntDef(Edit2.Text,100)));

      SendMessage(GetWindow(GetWindow(form1.chrm1.Handle, GW_CHILD), GW_CHILD),WM_LBUTTONUP,MK_LBUTTON, MAKELONG(StrToIntDef(Edit1.Text,100),StrToIntDef(Edit2.Text,100)));


    MK_LBUTTON可以改为0,MAKELONG可以改为MAKELParam


    三、JS控制滚动条的位置:
    window.scrollTo(x,y);

    竖向滚动条置顶(window.scrollTo(0,0);
    竖向滚动条置底 window.scrollTo(0,document.body.scrollHeight)
    或: window.scrollByo(0,document.body.scrollHeight)

    四、设置代理ip

    ceflib.pas单元:

    uses iniFiles;

       procedure TInternalApp.OnBeforeCommandLineProcessing(const processType: ustring;
          const commandLine: ICefCommandLine);
      var
        ini : TIniFile;
        str_ip : string;
      begin
        ini := TIniFile.Create(StringReplace(ParamStr(0),'.exe','.ini',[]));
        str_ip := ini.ReadString('default','Proxy','');
        ini.Free;
        commandLine.AppendSwitchWithValue('proxy-server',str_ip);
        if Assigned(CefOnBeforeCommandLineProcessing) then
          CefOnBeforeCommandLineProcessing(processType, commandLine);
      end;


    [default]
    Proxy=218.189.26.20:8080
    Proxy1=218.207.212.79:80

    Proxy2=120.203.159.18:8118

    转载请注明出处,原文地址:

    http://blog.csdn.net/xtfnpgy/article/details/48489489


  • 相关阅读:
    kgtp
    SSIS高级转换任务—行计数
    SSIS高级转换任务—OLE DB命令
    SQL点滴16—SQL分页语句总结
    Windows7中使用Task Scheduler调用WinScp批处理实现上传下载文件
    SSIS高级转换任务—导入列
    SSIS高级转换任务—关键词抽取
    SQL点滴15—在SQL Server 2008中调用C#程序
    C# 文件操作 全收录 追加、拷贝、删除、移动文件、创建目录、递归删除文件夹及文件....
    SQL点滴18—SqlServer中的merge操作,相当地风骚
  • 原文地址:https://www.cnblogs.com/xtfnpgy/p/9285398.html
Copyright © 2011-2022 走看看