最近编程论坛的很多网友反映在delphi中使用TWebBrowser控件时无法复制和粘贴，特提供解决方法如下。

在主窗体引用ActiveX单元。

uses Activex;

然后在主窗体的OnCreate事件中加入如下代码：

oleinitialize(nil);

最后在主窗体的OnDestory事件中加入

oleuninitialize; 

再试下吧，欢迎交流http://www.programbbs.com。