让TwebBrowser也能响应回车键

该日志由 samool 发表于 2008-03-14 10:17 AM

delphi 中 webbrowser1 浏览器中浏览网页,输入文本不能用ENTER键,无论你怎么按ENTER键,它都不会换行,还有,右键菜单的复制,和粘贴根本不是那么一回事,为什么呢?为什么??答案很简单,因为webbrowser不支持回车键响应,必须加上代码才行。

1,在使用TwebBrowser控件的窗体(例如MainForm)中创建一个函数(代码里的wb对应你的webbrowser名称)

2,在该窗体的FormCreate事件中,添加以下代码
oldHandler := Application.OnMessage;
Application.OnMessage := MsgHandler;

3,在该Form的private中声明以下两个全局变量
FOleInPlaceActiveObject: IOleInPlaceActiveObject;
oldHandler: TMessageEvent

4,把activeX头文件包进去

» 阅读该日志全文...

该日志标签: webbrowser, 回车, enter