zoukankan      html  css  js  c++  java
  • tangram2.6(XE2)Demo otify otifyGroup.groupproj

    1、以下此异常,为exe没有加载到Tangram_Core.bpl 放到exe当前文件夹下即可

    2、此例子的接口实现在exe中,exe中下发通知到dll,dll 中 as 获取接口传窗体到exe中;

    procedure TFrmMain.load; //exe下发通知
    var intf:INotifyService;
    begin
      if SysService.QueryInterface(INotifyService,Intf)=S_OK then
      begin
        self.lst_sel.Clear;
        Intf.SendNotify(NotifyFlag,self);
      end;
    end;
    procedure TUserModule.Notify(Flags: Integer; Intf: IInterface);
    begin
      if Flags=NotifyFlag then
      begin
        (Intf as IClsRegister).RegCls('浏览器',TFrmWebbrowser);
        (Intf as IClsRegister).RegCls('选    项',TFrmOptions);
      end;
    end;
    dll中接收通知后

    3、看不到什么时候加载了dll,难道是每一个dll自己注册自己?

    initialization
      RegisterModuleClass(TUserModule);  也不是这句起的作用?

  • 相关阅读:
    45.如何优雅的删除一张大表?
    13.安装上传和下载文件
    12.yum install 和yum localinstall区别
    7.Mysql之MGR环境搭建
    mod运算
    取整
    同余式
    Windows下的重定向
    C语言求正负余数
    复利计算公式
  • 原文地址:https://www.cnblogs.com/rogge7/p/5824269.html
Copyright © 2011-2022 走看看