请高手帮忙解决一下TWebBrowser的问题,谢谢(100分)

  • 主题发起人 主题发起人 ltf_ty
  • 开始时间 开始时间
L

ltf_ty

Unregistered / Unconfirmed
GUEST, unregistred user!
我想用TWebBrowser开发web页面,但是在TWebBrowser中,使用Back Space键是返回上一页的功能,但我不想让用户通过Back Space键进行回退,请问如何屏蔽键盘上的Back Space键,或是屏蔽Back Space键盘消息。
 
在form的keypress里拦截
 
谢谢andy263,但keypress不行,
不过问题我已经解决了。
 
to ltf_ty
怎么解决的...??
 
这是屏蔽右键的代码,你修改一下就可以用。

Application.OnMessage:=ApplicationEventsMessage;

//------------------------------------------------------------------------------
//消息回调
procedure TfrmClient.ApplicationEventsMessage(var Msg: tagMSG; var Handled: Boolean);
begin
if ((Msg.Message = WM_RBUTTONDOWN) then
begin
if (Msg.hwnd=Web.handle) then
Handled:=True;
end;
end;
 
页面里加上这段代码可以实现:
<script>
document.onkeydown = function(){
var e = window.event;
if (e.keyCode = 8) return false;
}
</script>
 
我也试着用截获消息,后来好像总是有问题,
最后我用键盘钩子,截获键盘事件,并屏蔽它,问题就解决了。
修改网页我没试过,因为网页不是我写的,无法修改。
不过还是谢谢大家。
 
屏蔽右键的功能对我也有用,谢谢了
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
899
SUNSTONE的Delphi笔记
S
后退
顶部