安装注册控件

（更详细的关于控件的介绍可以在《Authorware 7.0 基础与实例教程》，网上购买。）

如果要使用自己编写的控件或者使用其他人提供的控件，就先要在Windows中进行注册。同样如果我们的程序中使用了控件又要交给用户使用，最好必须先检测用户机中是否注册了该控件，若没有就要进行注册。

注册的方法有两种：

⑴一种是手动注册

方法是：单击Windows的“开始”菜单，选择“运行”命令，在打开的对话框中输入以下命令：

regsvr32  <ActiveX控件的文件名>

regsvr32.exe是Windows自带的ActiveX注册工具，可以在Windows的系统目录中找到，假定要注册一个自建的控件New.ocx，那么就输入如下命令，如图1所示：

　　regsvr32  new.ocx

图1  运行窗口

单击“确定”按钮，如果注册成功，将会出现如图2所示的对话框，提示控件注册成功，否则会出现如图3所示的对话框，提示控件没有注册成功，原因一般是已经注册过该控件或控件本身有问题。

图2  注册成功对话框

图3 注册失败对话框

若要解除某一个ActiveX控件的注册，则格式如下：

　　regsvr32  /u  <ActiveX控件的文件名>

比如要删除刚才注册的控件new.ocx，就可以在运行窗口输入以下命令：

　　regsvr32  /u new.ocx

然后单击“确定”按钮，如果删除成功，将出现如图4所示对话框，提示控件成功删除。

图4 控件删除成功对话框

⑵另一种是在Authorware中自动注册

方法是利用Authorware 中的Xtra ActiveX 里的函数来进行注册。

对ActiveX控件注册的格式如下：

　　ActiveXControlRegister("<ActiveX控件的文件名>")

如要注销该控件，格式如下：

　　ActiveXControlUnregister("<ActiveX控件的文件名>")

同样以new.ocx为例（通常首先要检测当前系统是否支持控件注册）：

注册控件：

　　if ActiveXInstalled()=-1 then
　　　　result:= ActiveXControlRegister(FileLocation^"new.ocx")
　　end if

这里假定new.ocx是放在程序文件所在目录中。result是自定义变量，用来记录函数ActiveXControlRegister的返回值的，若注册成功则返回值为-1，否则为0。

注销控件：

　　if ActiveXInstalled()=-1 then
　　 　　result:= ActiveXControlUnregister(FileLocation^"new.ocx")
　　end if