找传奇、传世资源到传世资源站!

delphi 调用谷歌内核打开网页

8.5玩家评分(1人评分)
下载后可评
介绍 评论 失效链接反馈

【例子介绍】

使用谷歌内核打开网站

【相关图片】

from clipboard

【源码结构】

procedure TMainForm.actDocExecute(Sender: TObject);
begin
  crm.Load('http://magpcss.org/ceforum/apidocs3');
end;

procedure TMainForm.actDomExecute(Sender: TObject);
begin
  if crm.Browser <> nil then
    crm.Browser.MainFrame.ExecuteJavaScript(
      'document.body.addEventListener("mouseover", function(evt){'
        'function getpath(n){'
          'var ret = "<" n.nodeName ">";'
          'if (n.parentNode){return getpath(n.parentNode) ret} else '
          'return ret'
        '};'
        'app.mouseover(getpath(evt.target))}'
      ')', 'about:blank', 0);
end;

评论

发表评论必须先登陆, 您可以 登陆 或者 注册新账号 !


在线咨询: 问题反馈
客服QQ:174666394

有问题请留言,看到后及时答复