delphi 跟 WebBrowser 中JS 交互思路
来源:互联网 发布:广州沙河网络批发市场 编辑:程序博客网 时间:2024/05/17 11:56
最近才接触delphi 在其他语言中跟WebBrowser 中JS交互很轻松,可在delphi 中交互却并不容易
问题有:
wb1.OleObject.Document.parentWindow.execScript('setData(1)', 'javascript');
以上代码可以调用网页JS 但delphi 得不到返回的js的返回值。
解决办法:
JS代码:
var result=''; //申明一个全局的返回变量值
function setData(s){
result='OK接收了数据';
}
delphi 代码:
wb1.OleObject.Document.parentWindow.execScript('setData(1)', 'javascript');
wb1.OleObject.Document.parentWindow.result
比如WebBrowser想主动调用delphi 似乎则无可下手。
完美解决方法网上有但问题依然太多。
我想起了10年前接触编程所使用Flash跟JS通信的一个案例。
利用修改网页标题来得到所传递的参数返回值。
但在delphi 中此方法并不是很好。网页标题会出现259的文字长度限制
只能另辟新方法:改变WebBrowser的URL获取当前的URL值。从中获得参数,
可是此方法似乎也是问题多多。也并不完美。行不通还得再换方法。
最终解决方法:监听WebBrowser的onBeforeNavigate2 事件 获得post的数据 这样就能解决 WebBrowser主动调用delphi 函数。而且支持大数据的传递
procedure TForm2.e(ASender: TObject; const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData, Headers: OleVariant; var Cancel: WordBool);
var
i: integer;
postStr: string;
postAry: array of byte;
begin
if Headers<>'' then
begin
postAry := PostData;
for i := 0 to Length(postAry) do
postStr := postStr + chr(postAry[i]);
ShowMessage(postStr);
end;
end;
- delphi 跟 WebBrowser 中JS 交互思路
- WebBrowser控件中JS与原生交互
- .Net中webBrowser控件JS交互
- Delphi WebBrowser与网页交互
- delphi中WEBBrowser网页JS函数调用delphi函数
- delphi中WEBBrowser网页JS函数调用delphi函数
- delphi中WEBBrowser网页JS函数调用delphi函数
- delphi webbrowser 执行js
- WPF中webBrowser控件与js的交互
- C#中webbrowser与javascript(js)交互的方法
- delphi中Webbrowser
- delphi中Webbrowser
- delphi 向webbrowser打开的网页中插入js命令
- Delphi中WebBrowser判断页面及JS是否加载完成
- Delphi中WebBrowser判断页面及JS是否加载完成
- [Winform]js与webbrowser交互
- delphi执行webbrowser中的js
- JS跟java交互,找不到java中定义的方法
- HDU-2501 Tiling_easy version(递推)
- 判断一个链表是否为有环链表
- STM32通过读取芯片唯一ID号来实现程序的保护,防止被抄袭
- ext4之Makefile
- CSS中margin和padding的区别
- delphi 跟 WebBrowser 中JS 交互思路
- mysql源码安装
- C++中回车换行(\n\r)和换行(\r)的区别
- 【CDP-云设计模式】第8章,4.预定的自动伸缩模式(Scheduled Autoscaling Pattern)
- 不写总结不睡觉学习日志第三篇
- Codeforces Round #374 (Div. 2) C. Journey dp
- pt、px和em
- 【数据结构】——包围法遍历二叉树
- Intel Code Challenge Elimination Round (Div.1 + Div.2, combined)