如何在TWebBrower里能正常使用各种键盘按键。比如Ctrl+C,回车等(100分)

  • 主题发起人 主题发起人 delhpi
  • 开始时间 开始时间
D

delhpi

Unregistered / Unconfirmed
GUEST, unregistred user!
在TWebBrower里显示的网页上,好像不能使用Ctrl+C,回车等按键。
如何像在IE里一样的效果,各种按键都能正常使用?
 
这个好象是你WEB控制的吧!
 
这种问题的答案google一大把.
 
function CoInitialize(pvReserved: Pointer): HResult; stdcall; external 'ole32.dll' Name 'CoInitialize';
procedure CoUninitialize; stdcall; external 'ole32.dll' Name 'CoUninitialize';

CoInitialize(Nil);

CoUninitialize;

未初始化OLE
 
来自:CoolSlob, 时间:2008-6-23 16:57:18, ID:3903580
这种问题的答案google一大把.
========
是的,看到几个代码,但也不是很多。一开始不是很熟悉,没有搞成功,今天搞成功了,是要处理消息的。



来自:jack011, 时间:2008-6-23 15:41:21, ID:3903563
这个好象是你WEB控制的吧!
============
这个是那个控件的特殊情况,不是网页的原因,不信你试试。




来自:风铃夜思雨, 时间:2008-6-23 18:50:13, ID:3903603
function CoInitialize(pvReserved: Pointer): HResult; stdcall; external 'ole32.dll' Name 'CoInitialize';
procedure CoUninitialize; stdcall; external 'ole32.dll' Name 'CoUninitialize';

CoInitialize(Nil);

CoUninitialize;

未初始化OLE
==========
看到有的地方说使用这个控件时,需要初始化。但好像和按键无关,我再试试。
 
initialization
{ TODO : WebBrowser是OLE对象,需要对它初始化 }
OleInitialize(nil);
finalization
try
OleUninitialize;
except
end;

我看到网上比较多的是这样,估计和你的差不多意思。
 
http://www.bsalsa.com/downloads.html
 
楼上,那个控件是比D的功能强,如果要求的功能比较多,是可以考虑,我的要求比较少。另外,现在找的方法,也是从那个控件的源码里来的,当然是别人搞出来的。

。。。。
/     (此方法来自EmbeddedWB.pas)
 
多人接受答案了。
 
后退
顶部