tangram2.6(XE2)framework框架加载包异常 调试的地方

添加以下的项目到项目组中，

　　 angram2.6(XE2)frameworkCoreTangram_Core.dpk

调试此包的SysModuleMgr.pas的函数，本人还没有测试

function TTangramModule.LoadModule: THandle;
begin
  try
    Result:=0;
    case GetModuleType of
      mtBPL:Result:=SysUtils.LoadPackage(self.FModuleFileName);
      mtDLL:Result:=Windows.LoadLibrary(Pchar(self.FModuleFileName));
    end;
  except
    on e:Exception do
      if SysService.QueryInterface(ILog,log)=S_OK then
      begin
        log.WriteLog(e.Message);
      end;
  end;
end;