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

     

    一、模拟移动鼠标

    //  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)

    四、设置代理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','ProxyIP','')     ini.Free;     commandLine.AppendSwitchWithValue(str_ip);     if Assigned(CefOnBeforeCommandLineProcessing) then       CefOnBeforeCommandLineProcessing(processType, commandLine);   end;

  • 相关阅读:
    ASP.NET的最新安全漏洞Important: ASP.NET Security Vulnerability
    Sql常用日期格式
    倒计时 服务器时间 .NET js javascript
    “备份集中的数据库备份与现有的数据库不同”解决方法
    2010年最佳jQuery插件
    jQuery1.4与json格式兼容问题
    .NET结束外部进程 C#结束外部进程
    十步优化SQL Server中的数据访问
    SQL游标的使用与语法
    SQL2005、SQL2008如何压缩日志文件(log) 如何清除日志
  • 原文地址:https://www.cnblogs.com/stroll/p/9942719.html
Copyright © 2011-2022 走看看