中国开发网: 论坛: 程序员情感CBD: 贴子 250553
pcplayer: 你的例子是操作页面上的元素,比如页面上的 Edit 框。如果直接把浏览器变成编辑状态,直接把浏览器当输入框呢?
用这个代码可以把浏览器变为编辑状态:

procedure TForm1.Button1Click(Sender: TObject);
var
HTMLDocument: IHTMLDocument2;
begin
HTMLDocument := WebBrowser1.Document as IHTMLDocument2;

if Assigned(HTMLDocument) then
HTMLDocument.designMode:='On';
HTMLDocument.close;
end;

用以下代码可以把你输入到浏览器的文字读到:

HTMLDocument := WebBrowser2.Document as IHTMLDocument2;
WS2:=HTMLDocument.body.outerHTML;

问题是,我没法把 KEYDOWN 事件挂上去,不知道你什么时候在里面敲了键盘!

相关信息:


欢迎光临本社区,您还没有登录,不能发贴子。请在 这里登录