我制作了一个Form,里面放了一个TWebBrowser 控件,运行程序,打开这个Form正常,但是程序退出的时候显示access violation.网上说要加这一段代码:
nitialization     
   OleInitialize(nil); 
finalization     
try      
   OleUninitialize;     
except    
end;
可是我不知道这段代码加在什么地方,请老大指点!!

解决方案 »

  1.   

    把代码加到主窗口代码的所有语句后面(在最后的结束标志end.之前)
      

  2.   

    我今天也在用TWebBrowser 控件,简单打开个网页,退出时候没有楼主说的问题?!
      

  3.   

    广州哥,我按照你说的加在了最后面,编译通过,可是运行的时候仍然出错:access violation
      

  4.   

    哥啊,我那个窗体里面啥也没有,就两个TLabel.只要把这个TWebBrowser 控件去掉,就不会报错。
    可恨的是,我重新建立一个新application,用TWebBrowser 控件居然就不报错。。
    是不是Delphi的鸟问题啊,快疯了
      

  5.   

    建议用新工程的TWebBrowser 来对比,看看有问题的工程中的TWebBrowser 属性有什么区别,因无法看到你的工程,帮不上忙。方便的话,或将你的工程打包让我看看?[email protected]
      

  6.   

    我试着把旧工程里面的所有form添加到那个不报错的新工程里面,结果就正常了。也不用加coInitialize,真是神奇的Delphi.不过怎么说,广州大哥还是针对问题回答正确,很热心,谢谢啊!