屏蔽自己程序中的webbrowser的vk_apps键和获得鼠标在webbrowser位置（xiaojun看到进来）(100分)

  • 主题发起人 主题发起人 wolfsong
  • 开始时间 开始时间
W

wolfsong

Unregistered / Unconfirmed
GUEST, unregistred user!
1、吃掉vk_apps,我试过吃掉WM_KEYDOWN,但是还是不能吃掉win和app键
2、我一同事用vc++生成的窗体，在最下方的状态栏里，可以显示鼠标在webbrowser里的
链接位置，就像ie一样，当鼠标放在一个超链接上时，在状态栏里显示网址，
delphi怎么实现？
 
2.只不过是个事件
procedure TForm1.WebBrowser1StatusTextChange(Sender: TObject;
const Text: WideString);
begin
caption:=Text;
end;
 
1.
可以通过截至消息屏蔽了系统键
下面是一个例子:
在private加入
procedure wmsyscommand(var msg:twmsyscommand);message wm_syscommand;
下面是过程代码:
procedure TForm1.wmsyscommand(var msg: twmsyscommand);
begin
if msg.CmdType<>SC_tasklist then
inherited;
end;
我来解释一下,当系统键按下就会发出一个wm_syscommand消息,如果msg.cmdtype等于
sc_tasklist表示启动开始菜单.上述代码是当时msg.mdtype=sctasklist
就不继承改消息的处理事件.
2.
procedure TMainForm.WebBrowserStatusTextChange(Sender: TObject;
const Text: WideString);
begin
WebStatusBar.Panels[0].Text:=Text;
end;
 
to zhihuali:
１、你的法子没效果
 
我查了一下资料，得到的答案竟然是：要屏蔽掉 VK_LWIN、VK_RWIN、VK_APPS ，
用 VxD 方式绝对行，即使你用钩子也只能屏蔽掉 VK_LWIN、VK_RWIN，而
VK_APPS 依然屏蔽不掉。
 
不会这么严重吧
 
干不掉算啦，那就加个问题：webbrowser不响应键盘，各位都是怎么做的？
比如拿vc,vj放的webbrowser，回车即可提交form，
而d5的，我用tab切换到按钮上也不能提交。（听说vb也能，delphi丢人那）
 
你看看下面的：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=620512
 
to zhihuali:
能不能给个iedelphi控件，
shuoshuo@yesky.com
我找不来，那个站我找不到下载
 
关注呀[:D]
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

G
怎样在DBGrid单击或是移动鼠标时获取。。。。。(0分)
回复
4
查看
139
jiarui
J
Y
WebBrowser 编程，请熟悉此道的朋友帮忙。动态取网页标记。(100分)
回复
10
查看
229
yexiaoming
Y
C
怎么取的鼠标的位置和按键?(20分)
回复
18
查看
270
cntiny
C
蓝
在delphi中如何显示带小数位的鼠标位置信息,如X,Y点的坐标? (10分)
回复
4
查看
219
lwgygz
L
O
怎么把软件在任务栏中的鼠标右键中的最小化最大化去掉？？？(50分)
回复
3
查看
162
onthesky
O
后退
顶部