如何使用 fmx webbrowser 发送 post 数据

Question

我想用 Twebbrowser 将数据发送到 web 中，通过 php $_post 方法接收，然后在 webbrowser 上显示为网页。此代码在我的 vcl 应用程序中完美运行

uses
httpapp;


Var
strData: string;
  PostData: OleVariant;
  Headers: OleVariant;
  i: Integer;
  url:string;
begin    
url :='http://www.abc...com'
strData := 'id=' + HTTPEncode('ID') + '&' +
    'ik=' + HttpEncode('ID2');
PostData := VarArrayCreate([0, Length(strData) - 1], varByte);
for i := 1 to Length(strData) do
    PostData[i-1] := Ord(strData[i]);
Headers := 'Content-Type: application/x-www-form-urlencoded' + #10#13;
WebBrowser1.Navigate(url+'/logs.php',EmptyParam,EmptyParam,PostData,Headers);
end;

但是当我为 android 设备应用程序尝试使用 fmx 时，它在 webbrowser.navigate 上向我发送错误消息 "too many actual parameter"。我如何 post 使用 fmx webbrowser 获取 fmx / android 应用程序的数据？

Answer 1

您可以创建自己的 html，其中包括论坛和 post 操作，并让 javascript 为您自动 post 填写表格，然后只需致电TWebBrowser.LoadFromStrings 从字符串变量中加载 html。

MyWebBrowser.LoadFromStrings({$I 'html\string_login_by_code.html.inc'},strSiteBaseURL);

"html\string_login_by_code.html.inc" 文件看起来像：

'<HTML><HEAD></HEAD><BODY>'+
'<script>'+
'window.onload = function() '+
'  {'+
'    document.getElementById("v_login").submit();'+
'  }'+
'</script>'+
'<form id="v_login" style="display:none" method="post" action="'+PostURL+'">'+
'<input type="hidden" name="'+chUserName+'" value="'+sUserName+'">'+
'<input type="hidden" name="'+chPassword+'" value="'+sPassword+'">'+
'<input type="submit" class="menu_submit" value="&nbsp;">'+
'</form>'+
'</BODY></HTML>'

如何使用 fmx webbrowser 发送 post 数据

how to send post data with fmx webbrowser

php

android

delphi

twebbrowser

postdata