delphi 使用TWebBrowser将文本值插入HTML输入时出错,EvaluateJavaScript()

mgdq6dx1  于 2023-11-18  发布在  Java
关注(0)|答案(1)|浏览(134)

我使用TWebBrowser将数据插入到Web表单中。我的应用程序是用 Delphi FMX编写的,在Android上运行。元素类型text没有插入值字符串。
超文本标记语言:

<input 
  type="text" 
  name="txtCPF" 
  id="txtCPF" 
  size="18" 
  maxlength="14" 
  autofocus="" 
  title="Informe os onze dígitos do número do CPF." 
  onkeypress="javascript: return EntradaNumerico(event);" 
  onfocus="javascript: RemoveMask('txtCPF');" 
  onblur="javascript: FG_FormatarCPF('txtCPF');" 
  autocomplete="off" 
  value=""
>

字符串
我需要在元素txtCPF中插入值类型String '02403989987',但是

  • 如果使用此代码:
var
  wbConsultaCPF: TWebBrowser;
begin
  wbConsultaCPF.EvaluateJavaScript('document.getElementById("txtCPF").value = "012345";');


.浏览器只显示
012345
在白色屏幕中。在iOS应用程序中,代码可以正常工作。

  • 如果我用途:
wbConsultaCPF.EvaluateJavaScript('document.getElementById("txtCPF").value = 012345;');


.浏览器将在元素值中显示正确的文本,但会删除第一个零:
12345

wbConsultaCPF.URL := 'https://servicos.receita.fazenda.gov.br/servicos/cpf/consultasituacao/ConsultaPublica.asp';

nbewdwxp

nbewdwxp1#

我在.EvaluateJavaScript()中创建了一个函数,它可以工作。示例:
Copyright © 2018 - 2019 www.txtCPF.com All Rights Reserved.京ICP备05002888号-1京公网安备1101050200000000号

相关问题