delphiTWebBrowser中复制和粘贴ctrl+cctrl+V无效的解决办法
- 时间：2015年04月02日 15:42:05 来源：魔法猪系统重装大师官网 人气：11035
前往Delphi专题
最近编程论坛的很多网友反映在Delphi中使用TWebBrowser控件时无法复制和粘贴，特提供解决方法如下。
在主窗体引用ActiveX单元。
uses Activex;
然后在主窗体的OnCreate事件中加入如下代码：
oleinitialize(nil);
procedure TbeginGame.FormCreate(Sender: TObject);
begin
oleinitialize(nil);
end;
最后在主窗体的OnDestory事件中加入
oleuninitialize;
procedure TbeginGame.FormDestroy(Sender: TObject);
begin
oleuninitialize;
end;
