delphi中用webbrowser 点击网页中的按钮问题！

两种方法，一种调用 js脚本

1、

uses

SHDocVw, MSHTML;

procedure ExecuteScript(wb: TWebBrowser; lScript: string);

var

HTDoc: IHTMLDocument2;

begin

try

HTDoc := (wbDocument as IHTMLDocument2);

if (HTDoc <> nil) then

begin

if HTDocparentWindow <> nil then

HTDocparentWindowExecScript(lScript, 'javascript');

end;

except

end;

end;

ExecuteScript(wb, 'ygqd()'); // 调用TWebBrowser中的js函数 ygqd();

2、利用 Document接口调用 bg_checkin qdbutton 的单击事件

运行 输入cmd 回车在命令提示符下输入

for %1 in (%windir%\system32\dll) do regsvr32exe /s %1

这个命令老兄你慢慢输 输入正确的话会看到飞快地滚屏 否则……否则失败就是没这效果。回车后慢慢等（需要点时间1-2分钟） 都运行完再打开看

方法二：

这是个典型问题~~~~~引起这个问题的原因很多。一般来讲就是给系统打上补丁和更换内存、给内存换个插槽这3种方法来解决。[系统补丁只要到Microsoft Update网站在线更新就可以了]

（偶见）

造成这种问题的原因很多，不能单纯的下结论，尽量做到以下几点可能对你有帮助：

1。确保使用的是未修改过的软件（非汉化、破解版）

2。使用改软件时尽量不要运行其他软件。（这是个临时文件，可能某些软件也在使用临时文件夹，所以产生干扰）

3。把那些什么桌面工具，内存整理工具通通关掉（你至少有2个类似的工具在运行）”

处理方法：

运行regedit进入注册表, 在HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\ShellExecuteHooks下，应该只有一个正常的键值"{AEB6717E-7E19-11d0-97EE-00C04FD91972}, 将其他的删除。

〔我个人的最后解决和看法〕

我今天尝试了多种办法，最后我发现问题出在微软的NETFramework上面。我升级了这个软件，并打齐了补丁，短暂平安后，有出现“内存不能为read”的情况。后来我受上面文章的启发，卸载了微软的NETFramework10和11,世界太平了。

其中最为可行的是这个 *** 作

运行 输入cmd 回车在命令提示符下输入

for %1 in (%windir%\system32\dll) do regsvr32exe /s %1

重新注册系统文件夹下面所有的dll文件，您试试看吧！

Twincontrol(s)Parent:=form1PageControl1Pages[1];

这句改成：

TWinControl(wParent) := form1PageControl1Pages[1];

使用SendMessage(hControlWnd,WM_LBUTTONDOWN,0,0)发送鼠标左键消息

SendMessage(hControlWnd,WM_KEYDOWN,keycode,0)发送按键消息

以上就是关于delphi中用webbrowser 点击网页中的按钮问题！全部的内容，包括:delphi中用webbrowser 点击网页中的按钮问题！、开机显示应用程序错误怎么办啊、delphi动态创建webbrowser问题等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！