lc_bcb_50.txt

c++ builder 的一些txt文档

ActiveX 控 件 注 册
  ActiveX 控 件 注 册 的
    几 种 方 法 
-ActiveX 控 件 是 一 个 动 态 链 接 库， 是 作 为 基 于COM 服 务 器  
  进 行 操 作 的， 并 且 可 以 嵌 入 在 包 容 器 宿 主 应 用 程 序 中，ActiveX 控 件 的 前 身 就 是OLE 控 件。 由  
  于ActiveX 控 件 与 开 发 平 台 无 关， 因 此， 在 一 种 编 程 语 言 上 开 发 的ActiveX 控 件 可 以 无 须 作  
  任 何 修 改， 即 可 在 另 一 种 编 程 语 言 中 使 用， 其 效 果 如 同 使 用 Windows 通 用 控 件 一 样。 如： 在VC  
  ＋ ＋ 中 开 发 的ActiveX 控 件， 不 作 任 何 修 改 即 可 应 用 于VB 中。 由 此 可 见， 通 过 使 用ActiveX 控  
  件 即 可 实 现 快 速 小 型 的 组 件 重 用、 代 码 共 享， 从 而 提 高 编 程 效 率。  
----从Internet 下 载 的ActiveX 控 件， 或 从 其 他 途 径 得 到  
  的ActiveX 控 件， 用 户 应 该 怎 样 做 才 能 正 确 使 用 呢 ？ 一 般 来 说， 一 个 外 来ActiveX 控 件 要 在Windows  
  中 被 正 确 使 用， 首 先 必 须 将 控 件 文 件( ＊.OCX) 复 制 到 硬 盘 中， 然 后 将 其 在Windows 中 注 册，  
  未 在 Windows 中 注 册 过 的ActiveX 控 件 是 不 能 使 用 的。 注 册ActiveX 控 件 一 般 来 说 有 三 种 途  
  径， 适 用 范 围 不 同， 各 有 各 的 优 点， 下 面 分 别 讨 论。  
 
  一、 使 用Regsvr32.exe 程 序 
 
    对ActiveX 控 件 进 行 注 册 
 
 
----对 于 未 注 册 过 的ActiveX 控 件 可 使 用 此 软 件 对 其 进 行 注  
册， 外 来ActiveX 控 件 要 应 用 到 自 己 的 程 序 中 也 必 须 进 行 注 册。 该 文 件 位 于Windows 目 录 的system  
子 目 录 下。 使 用 方 法 如 下： 点 击“ 开 始” →“ 运 行”； 在 运 行 对 话 框 中 输 入 以 下 命 令：  
regsvr32  < 文 件 名 >   注 册 一 个ActiveX 控 件
regsvr32 /u< 文 件 名 > 解 除 某ActiveX 控 件 的 注 册
 
----我 们 使 用 一 些 带ActiveX 控 件 的 应 用 程 序 时， 有 时 会  
  出 现 不 能 运 行 的 情 况， 这 有 可 能 是 其 自 带ActiveX 控 件 未 注 册 所 至， 这 时 不 妨 使 用 上 述 命 令  
  一 试。 另 外，VC ＋ ＋ 使 用 者 若 对regsvr32.exe 的 编 码 感 兴 趣 的 话， 可 在VC ＋ ＋ 的 联 机 帮 助 中  
  找 到 其 源 代 码。 若 使 用VC ＋ ＋ 6.0， 则 在MSDN 光 盘 的 \sample\VC98\MFC\controls\regsvr  
  中。  
 
  二、 使 用 安 装 程 序
 
    制 作 软 件：InstallShield 
 
 
----使 用regsvr32.exe 来 注 册ActiveX 控 件 虽 然 简 单， 但 需 要  
用 户 手 工 注 册， 在 不 用 时 还 得 手 工 解 除 注 册， 因 此， 这 对 一 个 应 用 程 序 来 说 并 非 好 的 解 决 方 案。  
大 型 应 用 软 件 一 般 都 有 一 个 安 装 程 序， 在 安 装 程 序 中 解 决ActiveX 控 件 注 册 是 较 为 理 想 的 一  
种 方 案。 使 用InstallShield 可 以 制 作 出 专 业 级 的Setup， 还 可 注 册 其 中 的ActiveX 控 件； 而 且，  
在 以 后 携 载 软 件 时， 自 动 注 销 掉 以 前 注 册 的ActiveX 控 件。 方 法 如 下：  
 
  启 动InstallShield， 使 用Project Wizard 建 立 一 个 新 的 项 目；  
  新 建 一 个“File Group”， 将 需 要 注 册 的ActiveX 控 件 文 件 放 入 此“File Group” 中；  
  将 上 述“File Group” 的“Self －Registered” 属 性 设 置 成“Yes”。 
 
----上 述 步 骤 仅 为 制 作Setup 中 设 置 自 动 注 册 ActiveX 控  
  件 几 步， 至 于 使 用InstallShield 怎 样 制 作 一 个 完 整 的Setup 不 在 本 文 讨 论 范 围 之 中, 请 读  
  者 自 己 参 看 有 关 书 籍。  
 
  三、 在 应 用 程 序 中
 
    加 入 注 册 代 码 
 
 
----对 于 小 型 程 序 不 宜 采 取 第 二 种 方 法， 较 好 的 方 法 是 在 程  
序 中 嵌 入 注 册 代 码， 实 现 应 用 程 序 自 注 册。 其 编 程 方 法 是：  
 
  使 用Windows API 函 数LoadLibrary 载 入ActiveX 控 件；  
  使 用GetProcAddress 函 数 获 取ActiveX 控 件 中 注 册 函 数DllRegisterServer （ 注 销 函  
    数 为DllUnregisterServer） 指 针；  
  调 用 注 册 函 数DllRegisterServer（ 或 注 销 函 数DllUnregisterServer）。 
 
----下 面 以VC ＋ ＋ 6.0 编 写 的RegActivex 程 序 为 例， 介 绍  
  怎 样 在 程 序 中 自 动 注 册（ 注 销）ActiveX 控 件。RegActivex 的 主 体 框 架 由VC ＋ ＋ 6.0 的AppWizard  
  自 动 产 生， 在 其 基 础 上 增 加 两 个 菜 单 项：“ 注 册ActiveX 控 件”、“ 注 销ActiveX 控 件”。 当 选 择“  
  注 册 ActiveX 控 件” 菜 单 时， 将 对 控 件toweratl.ocx（ 一 个 汉 诺 游 戏） 进 行 注 册； 当 选 择“ 注  
  销ActiveX 控 件” 菜 单 时， 将 解 除 控 件toweratl.ocx 的 注 册。  
 
  使 用VC ＋ ＋ 6.0 建 立 一 个 单 文 档 的 应 用 程 序RegActivex， 其 他 项 目 接 受 默 认 设 置；  
  给 应 用 程 序 增 加 两 个 菜 单 项：“ 注 册ActiveX 控 件”、“ 注 销ActiveX 控 件”， 步 骤 如 下：  
     
      单 击VC ＋ ＋ 6.0 左 边 窗 口 的“ResoureView”， 双 击MENU 项 目 下 的IDR_MAINFRAME 以  
        打 开 菜 单 编 辑 器；  
      在 菜 单 编 辑 器 中， 加 入 一 个 主 菜 单“ 注 册”， 在“ 注 册” 主 菜 单 下 加 入 两 个 菜 单 项：“  
        注 册ActiveX 控 件”、“ 注 销ActiveX 控 件”； 
     
  给 新 建 的 菜 单 项 “ 注 册ActiveX 控 件” 和“ 注 销ActiveX 控 件” 增 加 响 应 函 数：  
     
      在 资 源 编 辑 器 中， 双 击MENU 中 的IDR_MAINFRAME 打 开 菜 单 编 辑 器， 单 击“ 注 册ActiveX  
        控 件”, 按Ctrl ＋W 打 开MFC Class Wizard;  
      双 击Messages 框 中 的COMMAND, 给“ 注 册ActiveX 控 件” 菜 单 项 增 加 响 应 函 数OnRegisterReg(),  
        单 击 右 边“Edit” 按 钮, 给OnRegisterReg() 函 数 增 加 如 下 代 码：  
        void CMainFrame::OnRegisterReg()
  {
  //ActiveX 控 件 的 路 径 及 文 件 名
  LPCTSTR pszDllName=“toweratl.ocx";
   // 装 载ActiveX 控 件
  HINSTANCE hLib = LoadLibrary(pszDllName);
   if (hLib < (HINSTANCE)HINSTANCE_ERROR)
   {
  MessageBox(“ 不 能 载 入Dll 文 件!",
 “ 结 果",MB_OK);
  return;
  }
  // 获 取 注 册 函 数DllRegisterServer 地 址
      FARPROC lpDllEntryPoint; 
      lpDllEntryPoint = GetProcAddress
      (hLib,_T(“DllRegisterServer"));
      // 调 用 注 册 函 数DllRegisterServer
 if(lpDllEntryPoint!=NULL)
      {
      if(FAILED(( ＊lpDllEntryPoint)()))
      {
      MessageBox(“ 调 用DllRegisterServer 失 败 ！",
                 “ 结 果",MB_OK);
      FreeLibrary(hLib);
      return;
      };
      MessageBox(“ 注 册 成 功",“ 结 果",MB_OK);
      }
      else
      MessageBox(“ 调 用DllRegisterServer 失 败 ！",
                 “ 结 果",MB_OK);
}
 
      “ 注 销ActiveX 控 件” 菜 单 项 响 应 函 数 的 编 写 方 法 同 上， 代 码 也 相 似， 只 是 将 “lpDllEntryPoint=GetProcAddress(hLib,_T(“DllRegisterServer"));”  
        改 成：  
          lpDllEntryPoint = GetProcAddress(hLib,_T
(“DllUnregisterServer"))。
 
       
     
  编 译 联 接 上 述 程 序， 即 可 得 一 个 可 执 行 文 件。 另 需 注 意 的 是： 应 将ActiveX 控 件 文 件toweratl.ocx  
    复 制 到Windows 的system 目 录 下。 控 件 文 件toweratl.ocx 在 微 软 出 版 的《Visual C ＋ ＋ 6.0  
    程 序 员 指 南》 所 附 光 盘 中 可 以 找 到。  
  测 试 上 述 程 序： 运 行《Visual C ＋ ＋ 6.0 程 序 员 指 南》 所 附 光 盘 中 的game2 程 序， 若 使 用RegActivex  
    注 册 了toweratl.ocx 控 件， 则 该 程 序 可 以 正 常 运 行； 若 使 用RegActivex 注 销 了toweratl.ocx  
    控 件 则game2 不 能 运 行。