关于TWebBrowser组件,执行复制时出现'试图吊销一个未注册的拖放目标''解决方案

傲月游居

在delphi中,用TWebBrowser组件开发浏览器的时候,程序能够编译,但是执行复制,剪切两项功能,还有在WebOfffice组件等等中,出现"试图吊销一个未注册的拖放目标"错误.
这个问题,我放在大富翁和CSDN论坛上几天都没有得到解决.
今天终于想出了一个解决的方案.
整个程序代码的最后（end.之前）添加以下代码:
  initialization
    OleInitialize(nil);
  finalization
  try
    OleUninitialize;
  except
end;
OleInitialize、OleUninitialize未声明的错误!
而initialization,oleuninitialize的正确使用方法是在uses单元后面添加ActiveX.然后去掉程序中异常部分即可.