webbrowser在打开的页面中不支持ctrl+c,ctrl+v等快捷键，Del都不支持，能不能提供解决方

yank · 发表于 2011-12-26 10:35:35

webbrowser在打开的页面中不支持ctrl+c,ctrl+v等快捷键，Del都不支持，能不能提供解决方法啊。论坛中提供的方法都不可行，参考Delphi的方法对于X3来说不适用。着急解决这个问题，能不能提供解决方法啊

yank · 发表于 2011-12-26 17:15:06

怎么没人啊，顶

jjh · 发表于 2012-1-5 16:52:39

这个应该跟Delphi的处理方式一样，找到一个方法可以试一下：

６、使WebBrowser获得焦点

　　TWebBrowser非常特殊，它从TWinControl继承来的SetFocus方法并不能使得它所包含的文档获得焦点，从而不能立即使用Internet Explorer本身具有得快捷键，解决方法如下：<

　　procedure TForm1.SetFocusToDoc;
　　begin
　　　if WebBrowser1.Document <> nil then
　　　　with WebBrowser1.Application as IOleobject do
　　　　　DoVerb(OLEIVERB_UIACTIVATE, nil, WebBrowser1, 0, Handle, GetClientRect);
　　end;

　　除此之外，我还找到一种更简单的方法，这里一并列出：

　　if WebBrowser1.Document <> nil then
　　　IHTMLWindow2(IHTMLDocument2(WebBrowser1.Document).ParentWindow).focus

　　刚找到了更简单的方法，也许是最简单的：

　　if WebBrowser1.Document <> nil then
　　　IHTMLWindow4(WebBrowser1.Document).focus

　　还有，需要判断文档是否获得焦点这样来做：

　　if IHTMLWindow4(WebBrowser1.Document).hasfocus then

http://www.delphifans.com/infoview/Article_865.html

yank · 发表于 2012-1-5 16:54:50

这个方法试过了，webbrowser根本就获取不到焦点

sj · 发表于 2012-1-5 16:55:53

无解，OCX跟浏览器配合的问题。可以用最新版本试试。

yank · 发表于 2012-1-5 16:59:34

使得webbrowser获得焦点的这几句代码应该放在什么地方，是不是和用的地方不同效果也不一样呢

yank · 发表于 2012-1-5 17:02:19

还有使用新版本就可以解决这个问题吗

yank · 发表于 2012-1-5 17:33:09

如果真不能实现，请给个明确的答复，因为我们需要向用户解释，麻烦了

		自动登录	找回密码
密码			立即注册