客户端(IE)调用dephi写的com需要调低安全级别的问题

找了好久，以为是签名问题。原来不是。控件签名与代码安全是两个概念。

又找了好久发现CB可以用IObjectSafety，于是想找delphi相关代码，没有找到，查帮助文档，连说明节点都没有。硬着头皮让Com也继承IObjectSafety，提示两个方法没实现，高兴!查原代码，写上实现。编译，说没有返回，那就返回吧Result:=S_OK;

编译，通过! 打开测试的html，结果居然通过了!

function  TDitchesTree.GetInterfaceSafetyOptions( const  IID: TIID;
  pdwSupportedOptions, pdwEnabledOptions: PDWORD): HResult;
begin
  result: = S_OK;
end ;

function  TDitchesTree.SetInterfaceSafetyOptions( const  IID: TIID;
  dwOptionSetMask, dwEnabledOptions: DWORD): HResult;
begin
  result: = S_OK;
end ;