ActiveX 控 件 注 册 的几 种 方 法

韩冰

ActiveX 控 件 注 册 的几 种 方 法

L. x9 c# h4 B

( i$ W* q* _7 Z$ }. a! M! Z# ~

-ActiveX 控 件 是 一 个 动 态 链 接 库， 是 作 为 基 于COM 服 务 器 进

# {0 A2 E* a( d! [* A

行 操 作 的， 并 且 可 以 嵌 入 在 包 容 器 宿 主 应 用 程 序 中，

: \; o+ i7 j$ I

ActiveX 控 件 的 前 身 就 是OLE 控 件。 由 于ActiveX 控 件 与 开 发 平

7 ~: q! T' a& n, \

台 无 关， 因 此， 在 一 种 编 程 语 言 上 开 发 的ActiveX 控 件 可

$ i$ I4 }2 x" y5 y$ f! x

以 无 须 作 任 何 修 改， 即 可 在 另 一 种 编 程 语 言 中 使 用， 其

5 F0 A6 n! Q4 e- z9 s- r* O

效 果 如 同 使 用 Windows 通 用 控 件 一 样。 如： 在VC ＋ ＋ 中 开

; q, a$ _1 e# H8 F, @3 X7 H

发 的ActiveX 控 件， 不 作 任 何 修 改 即 可 应 用 于VB 中。 由 此 可

见， 通 过 使 用ActiveX 控 件 即 可 实 现 快 速 小 型 的 组 件 重 用

9 @ q1 g J) x1 J) T7 u6 _6 r

、 代 码 共 享， 从 而 提 高 编 程 效 率。

; u* g" l3 o3 d5 V S% w6 b2 T

: w, t( a4 b8 K3 L R

----从Internet 下 载 的ActiveX 控 件， 或 从 其 他 途 径 得 到 的

ActiveX 控 件， 用 户 应 该 怎 样 做 才 能 正 确 使 用 呢 ？ 一 般 来

1 Z8 G* q- }; r) b# R1 D% ~

说， 一 个 外 来ActiveX 控 件 要 在Windows 中 被 正 确 使 用， 首 先

& V0 x+ ]0 Q7 }7 P5 [5 d L; c% @

必 须 将 控 件 文 件( ＊.OCX) 复 制 到 硬 盘 中， 然 后 将 其 在

Windows 中 注 册， 未 在 Windows 中 注 册 过 的ActiveX 控 件 是 不 能

使 用 的。 注 册ActiveX 控 件 一 般 来 说 有 三 种 途 径， 适 用 范

# y( t/ g6 `# u3 d$ t2 Q

围 不 同， 各 有 各 的 优 点， 下 面 分 别 讨 论。

$ T7 A' k7 u7 V# t$ I

一、 使 用Regsvr32.exe 程 序

对ActiveX 控 件 进 行 注 册

( m0 q) \, ~/ I0 t* y

----对 于 未 注 册 过 的ActiveX 控 件 可 使 用 此 软 件 对 其 进 行 注

- a8 K# a; L3 e9 E* g' C

册， 外 来ActiveX 控 件 要 应 用 到 自 己 的 程 序 中 也 必 须 进 行

注 册。 该 文 件 位 于Windows 目 录 的system 子 目 录 下。 使 用 方

1 j4 ^6 w# B0 v+ n9 J% D

法 如 下： 点 击“ 开 始” →“ 运 行”； 在 运 行 对 话 框 中 输 入

以 下 命 令：

t# d5 u+ p) ]4 s/ R" i: d) A

regsvr32 < 文 件 名 > 注 册 一 个ActiveX 控 件

regsvr32 /u< 文 件 名 > 解 除 某ActiveX 控 件 的 注 册

----我 们 使 用 一 些 带ActiveX 控 件 的 应 用 程 序 时， 有 时 会 出

现 不 能 运 行 的 情 况， 这 有 可 能 是 其 自 带ActiveX 控 件 未 注

册 所 至， 这 时 不 妨 使 用 上 述 命 令 一 试。 另 外，VC ＋ ＋ 使

; `; {3 t6 z1 `; W3 V6 n

用 者 若 对regsvr32.exe 的 编 码 感 兴 趣 的 话， 可 在VC ＋ ＋ 的 联

机 帮 助 中 找 到 其 源 代 码。 若 使 用VC ＋ ＋ 6.0， 则 在MSDN 光

4 x7 F1 { B2 a- D7 L5 @

盘 的 \sample\VC98\MFC\controls\regsvr 中。

3 r; m& b- s' |! p) w' b5 f

二、 使 用 安 装 程 序

+ D* q, \; d* q. G4 o

制 作 软 件：InstallShield

) [0 d& X2 K2 O; |6 P1 p

) _) N u9 F% |! [2 i7 {

----使 用regsvr32.exe 来 注 册ActiveX 控 件 虽 然 简 单， 但 需 要 用

# C- D) ]6 C: u+ s! g

户 手 工 注 册， 在 不 用 时 还 得 手 工 解 除 注 册， 因 此， 这 对

一 个 应 用 程 序 来 说 并 非 好 的 解 决 方 案。 大 型 应 用 软 件

一 般 都 有 一 个 安 装 程 序， 在 安 装 程 序 中 解 决ActiveX 控 件

2 q7 z p4 h* r& x

注 册 是 较 为 理 想 的 一 种 方 案。 使 用InstallShield 可 以 制 作

出 专 业 级 的Setup， 还 可 注 册 其 中 的ActiveX 控 件； 而 且， 在

以 后 携 载 软 件 时， 自 动 注 销 掉 以 前 注 册 的ActiveX 控 件。 方

法 如 下：

启 动InstallShield， 使 用Project Wizard 建 立 一 个 新 的 项 目；

$ ?7 @3 W& C3 G, b/ |; C, N

新 建 一 个“File Group”， 将 需 要 注 册 的ActiveX 控 件 文 件 放 入

此“File Group” 中；

$ k* W; f& ^5 I! Z1 C, z! A

将 上 述“File Group” 的“Self －Registered” 属 性 设 置 成“Yes”。

, ~' m/ y6 B4 ^& B# A- d

1 I3 Z4 V! A2 Z1 J

----上 述 步 骤 仅 为 制 作Setup 中 设 置 自 动 注 册 ActiveX 控 件 几

: L7 O5 q, u5 X: _, T0 Q

步， 至 于 使 用InstallShield 怎 样 制 作 一 个 完 整 的Setup 不 在

M4 K- z/ ]) S+ A3 N6 b3 i8 w/ U

本 文 讨 论 范 围 之 中, 请 读 者 自 己 参 看 有 关 书 籍。

三、 在 应 用 程 序 中

3 w+ H. D: }1 p c, U* M

加 入 注 册 代 码

5 A2 }+ F* m& ?

----对 于 小 型 程 序 不 宜 采 取 第 二 种 方 法， 较 好 的 方 法 是

P! ^& d5 X' D& r! K# n

在 程 序 中 嵌 入 注 册 代 码， 实 现 应 用 程 序 自 注 册。 其 编 程

方 法 是：

使 用Windows API 函 数LoadLibrary 载 入ActiveX 控 件；

4 t: V+ Q+ S7 H2 @ `( A

使 用GetProcAddress 函 数 获 取ActiveX 控 件 中 注 册 函 数

9 `0 o) t6 y1 O7 f; \$ p* I I

DllRegisterServer （ 注 销 函 数 为DllUnregisterServer） 指 针；

J9 X* @9 X( k* k/ O2 T3 h9 ^

调 用 注 册 函 数DllRegisterServer（ 或 注 销 函 数

. U' j# |1 a" [/ @4 X8 d- f& R& i6 }. ^

DllUnregisterServer）。

4 o1 Q7 a* \; @9 X, C

----下 面 以VC ＋ ＋ 6.0 编 写 的RegActivex 程 序 为 例， 介 绍 怎 样

9 w( e2 o! g# ~, P: w

在 程 序 中 自 动 注 册（ 注 销）ActiveX 控 件。RegActivex 的 主 体

2 n! {1 n" Q! e; m9 B

框 架 由VC ＋ ＋ 6.0 的AppWizard 自 动 产 生， 在 其 基 础 上 增 加 两

个 菜 单 项：“ 注 册ActiveX 控 件”、“ 注 销ActiveX 控 件”。 当 选

2 D: t2 j- O3 R$ G; h V4 H+ g

择“ 注 册 ActiveX 控 件” 菜 单 时， 将 对 控 件toweratl.ocx（ 一 个

汉 诺 游 戏） 进 行 注 册； 当 选 择“ 注 销ActiveX 控 件” 菜 单 时

， 将 解 除 控 件toweratl.ocx 的 注 册。

使 用VC ＋ ＋ 6.0 建 立 一 个 单 文 档 的 应 用 程 序RegActivex， 其

0 ]& s) V# L5 G" x" E7 m3 w

他 项 目 接 受 默 认 设 置；

: O% v4 N. {; i9 D* H( F3 y/ h

给 应 用 程 序 增 加 两 个 菜 单 项：“ 注 册ActiveX 控 件”、“ 注 销

5 N5 X" H! ]$ _% p! x5 f+ p1 X

ActiveX 控 件”， 步 骤 如 下：

7 C0 O! e" O4 u" n

单 击VC ＋ ＋ 6.0 左 边 窗 口 的“ResoureView”， 双 击MENU 项 目 下

的IDR_MAINFRAME 以 打 开 菜 单 编 辑 器；

! f6 Y. E# {$ k, A0 i8 R. A

在 菜 单 编 辑 器 中， 加 入 一 个 主 菜 单“ 注 册”， 在“ 注 册”

d1 A- i. ?% ?" e( o

主 菜 单 下 加 入 两 个 菜 单 项：“ 注 册ActiveX 控 件”、“ 注 销

ActiveX 控 件”；

给 新 建 的 菜 单 项 “ 注 册ActiveX 控 件” 和“ 注 销ActiveX 控 件”

3 |3 s6 Q( k2 _. w0 y

增 加 响 应 函 数：

: i+ u% J! g: l6 K( i

在 资 源 编 辑 器 中， 双 击MENU 中 的IDR_MAINFRAME 打 开 菜 单 编 辑

; Y9 S5 k# y& W% H

器， 单 击“ 注 册ActiveX 控 件”, 按Ctrl ＋W 打 开MFC Class Wizard;

# G! K5 R, }8 ]3 [3 H6 V2 k

双 击Messages 框 中 的COMMAND, 给“ 注 册ActiveX 控 件” 菜 单 项 增

加 响 应 函 数OnRegisterReg(), 单 击 右 边“Edit” 按 钮, 给

% ~1 d% ^% O# T* D# F$ P: q) K

OnRegisterReg() 函 数 增 加 如 下 代 码：

9 J$ u- S. v) `. G

void CMainFrame::OnRegisterReg()

{

( i! e& ?. j: F: O( R# Q

//ActiveX 控 件 的 路 径 及 文 件 名

/ e+ n& I$ f2 J; L& k* I

LPCTSTR pszDllName=“toweratl.ocx";

- a, C6 T5 `+ P( v

// 装 载ActiveX 控 件

HINSTANCE hLib = LoadLibrary(pszDllName);

" _1 Q7 a- v. X F! I" [/ K, L' [

if (hLib < (HINSTANCE)HINSTANCE_ERROR)

Y) M/ g* V7 q- Q6 c0 Y

{

MessageBox(“ 不 能 载 入Dll 文 件!",

“ 结 果",MB_OK);

return;

* x' k% D2 H: I, h

}

. U1 [% s3 N1 X

/ H( x8 E# X# B# P7 y/ a' G& G

// 获 取 注 册 函 数DllRegisterServer 地 址

FARPROC lpDllEntryPoint;

2 y* V4 ]/ g) R! s; S& z0 a

lpDllEntryPoint = GetProcAddress

(hLib,_T(“DllRegisterServer"));

& ?+ N) t1 ]% a4 @6 v: _9 E

// 调 用 注 册 函 数DllRegisterServer

if(lpDllEntryPoint!=NULL)

, b, D' I U/ ~% I I) G. p

{

if(FAILED(( ＊lpDllEntryPoint)()))

{

5 j/ d$ Q& _2 M

MessageBox(“ 调 用DllRegisterServer 失 败 ！",

“ 结 果",MB_OK);

5 y" `0 }+ T) g9 |4 [

FreeLibrary(hLib);

return;

9 [! \7 w- G2 N

};

7 Z3 H- J3 h; {( V5 U) K

MessageBox(“ 注 册 成 功",“ 结 果",MB_OK);

_) z2 z" s0 p) ?2 `

}

else

5 `& x9 c& C) u

MessageBox(“ 调 用DllRegisterServer 失 败 ！",

“ 结 果",MB_OK);

}

# k0 D2 z0 O0 E) }6 d2 f0 D' m

“ 注 销ActiveX 控 件” 菜 单 项 响 应 函 数 的 编 写 方 法 同 上， 代

7 D$ n3 Z/ P: B0 s0 ^, {( C$ {

码 也 相 似， 只 是 将 “lpDllEntryPoint=GetProcAddress(hLib,_T(“

DllRegisterServer"));” 改 成：

. [: v9 f' D! I

lpDllEntryPoint = GetProcAddress(hLib,_T

2 q/ e1 h/ T% q- I

(“DllUnregisterServer"))。

, N a2 Z9 k& p

0 S# `# g, u( w$ W

编 译 联 接 上 述 程 序， 即 可 得 一 个 可 执 行 文 件。 另 需 注 意

的 是： 应 将ActiveX 控 件 文 件toweratl.ocx 复 制 到Windows 的system

7 p/ E. Q6 W' k: s( F$ w

目 录 下。 控 件 文 件toweratl.ocx 在 微 软 出 版 的《Visual C ＋ ＋

6.0 程 序 员 指 南》 所 附 光 盘 中 可 以 找 到。

测 试 上 述 程 序： 运 行《Visual C ＋ ＋ 6.0 程 序 员 指 南》 所 附

光 盘 中 的game2 程 序， 若 使 用RegActivex 注 册 了toweratl.ocx 控 件

， 则 该 程 序 可 以 正 常 运 行； 若 使 用RegActivex 注 销 了

toweratl.ocx 控 件 则game2 不 能 运 行。