delphi 如何使用TEdgeBrowser组件以及打包环境在其他主机上运行

不管开发环境还是第三方环境先安装运行时库:
Microsoft Edge WebView2 | Microsoft Edge Developer

开发环境可以直接通过:
delphi IDE安装

安装完毕后进入到指定路径,复制里面的WebView2Loader.dll到你要开发的程序根目录:

大致路径如下,每个人的都有点差异,名称或版本都不太一样,就作为参考吧:
C:\Users\%username%\Documents\Embarcadero\Studio\22.0\CatalogRepository\EdgeView2SDK-1.0.1054.31\Bin\32位就选X86

总体配置完成,可以正常调用TEdgeBrowser打开网页了

//调用代码片段
procedure TForm2.Button1Click(Sender: TObject);
begin
  EdgeBrowser1.Navigate(Edit1.Text);
end;

进阶使用,使用JS控制浏览器自动填充账号密码,这一段不是通用的代码,要根据实际网页元素和ID等信息进行调用,只能作为参考如何运行js
 

//自动填充账号密码,作为如何调用JS的例子
//使用js代码时,不熟悉怎么写,直接用chatgpt或者通义千问,以及智谱清言这几个AI辅助写出大概,自己简单替换下就行
procedure TForm1.auto_edit_acc_pwd;
var
  JSCode: string;
begin
  JSCode := Format(
    'function fillInput(selector, value) {' +
    '  var input = document.querySelector(selector);' +
    '  if (input) {' +
    '    input.value = value;' +
    '    var event = new Event("input", { bubbles: true });' +
    '    input.dispatchEvent(event);' +
    '    event = new Event("change", { bubbles: true });' +
    '    input.dispatchEvent(event);' +
    '  }' +
    '}' +
    'fillInput("#usernameIpt", "%s");' +  // 填充用户名
      'fillInput("input[type=password]", "%s");' +  // 填充密码
      'document.querySelector("button[type=submit]").click();', [acc.text, pwd.Text]);  // 点击登录按钮
  // 执行JavaScript代码
  EdgeBrowser.ExecuteScript(JSCode);
end;

  • 2
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值