如何在PB的程序中注册用到的OCX控件
2008-12-09 14:57
169 查看
如果在程序中使用了OCX控件,在开发阶段,可以使用Windows的程序来注册这个控件,如:
regsvr32 ccrpftv6.ocx
regsvr32 filevw61.ocx
如果取消注册的话:
regsvr32 /u ccrpftv6.ocx
regsvr32 /u filevw61.ocx
但是,如果程序写好了,要将其发布出去,不可能让用户自己去运行这个命令,那么怎么办呢?
办法有很多,其中之一是在安装程序(比如InstallShield)中来注册,另外一个办法就是在程序中自动进行注册。
此处,我们只讨论在程序中进行OCX注册的问题。
我们知道,OCX文件中都有一个接口DllRegisterServer,这个接口就是用来注册自身的,所以,问题变得非常简单,首先,声明一个外部函数:
Function long DllRegisterServer() Library "ccrpftv6.ocx"
然后在程序中进行调用:
DllRegisterServer()
但是,如果我们的程序中使用了多个OCX,而每个OCX的注册接口都是DllRegisterServer,怎么办呢?这个问题可以用alias关键字来解决,如:
Function long DllRegisterServer_ccrptv6() Library "ccrpftv6.ocx" alias for "DllRegisterServer"
Function long DllRegisterServer_filevw61() Library "filevw61.ocx" alias for "DllRegisterServer"
程序中这样调用:
DllRegisterServer_ccrptv6()
DllRegisterServer_filevw61()
当然,如果每次运行的时候都去注册,显然效率不高,我们的需求是只有当控件没有注册的时候进行注册,这样,我们需要知道控件的CLSID,这个可以从注册表中查到,注册之前先判断一下十分已经注册,如果没有注册,则进行注册,举例如下:
string ls_temp
integer li_ret
long ll_ret
li_ret = RegistryGet("HKEY_CLASSES_ROOT/CLSID/{19B7F2D6-1610-11D3-BF30-1AF820524153}/TypeLib", "", RegString!, ls_temp)//{19B7F2D6-1610-11D3-BF30-1AF820524153}是这个控件的CLSID
if li_ret = -1 then //如果返回-1,说明没有注册
ll_ret = DllRegisterServer_ccrptv6()
end if
转自:http://blog.csdn.net/kingworld/archive/2005/07/07/416717.aspx
regsvr32 ccrpftv6.ocx
regsvr32 filevw61.ocx
如果取消注册的话:
regsvr32 /u ccrpftv6.ocx
regsvr32 /u filevw61.ocx
但是,如果程序写好了,要将其发布出去,不可能让用户自己去运行这个命令,那么怎么办呢?
办法有很多,其中之一是在安装程序(比如InstallShield)中来注册,另外一个办法就是在程序中自动进行注册。
此处,我们只讨论在程序中进行OCX注册的问题。
我们知道,OCX文件中都有一个接口DllRegisterServer,这个接口就是用来注册自身的,所以,问题变得非常简单,首先,声明一个外部函数:
Function long DllRegisterServer() Library "ccrpftv6.ocx"
然后在程序中进行调用:
DllRegisterServer()
但是,如果我们的程序中使用了多个OCX,而每个OCX的注册接口都是DllRegisterServer,怎么办呢?这个问题可以用alias关键字来解决,如:
Function long DllRegisterServer_ccrptv6() Library "ccrpftv6.ocx" alias for "DllRegisterServer"
Function long DllRegisterServer_filevw61() Library "filevw61.ocx" alias for "DllRegisterServer"
程序中这样调用:
DllRegisterServer_ccrptv6()
DllRegisterServer_filevw61()
当然,如果每次运行的时候都去注册,显然效率不高,我们的需求是只有当控件没有注册的时候进行注册,这样,我们需要知道控件的CLSID,这个可以从注册表中查到,注册之前先判断一下十分已经注册,如果没有注册,则进行注册,举例如下:
string ls_temp
integer li_ret
long ll_ret
li_ret = RegistryGet("HKEY_CLASSES_ROOT/CLSID/{19B7F2D6-1610-11D3-BF30-1AF820524153}/TypeLib", "", RegString!, ls_temp)//{19B7F2D6-1610-11D3-BF30-1AF820524153}是这个控件的CLSID
if li_ret = -1 then //如果返回-1,说明没有注册
ll_ret = DllRegisterServer_ccrptv6()
end if
转自:http://blog.csdn.net/kingworld/archive/2005/07/07/416717.aspx
相关文章推荐
- 如何在PB的程序中注册用到的OCX控件
- VC++如何在程序中用代码注册和卸载ocx控件(代码)
- 用到一个vb5的控件不能注册Big2GB.ocx,最后注册成功了。
- 如何在JS代码中判断客户端ocx控件是否注册成功
- 解决 pb插入ole控件点击insert control时关闭他PB插入OCX控件程序崩溃问题
- VC++在MFC程序中如何注册/注销ActiveX控件(.OCX)
- 在MFC程序中如何注册/注销/检测ActiveX控件(.OCX)
- 如何注册dll、ocx控件
- 如何注册OCX控件
- 如何注册dll、ocx控件
- VC++在MFC程序中如何注册/注销ActiveX控件(.OCX)
- 帮同事写了几行代码,在 安装/卸载 程序里 注册/卸载 OCX控件
- PB自动注册OCX控件
- PB实现自动判断并注册Dll/OCX控件
- Win7 下如何注册OCX控件?
- 如何在cmd中注册DLL和OCX控件
- 如何注册OCX控件
- 如何注册OCX控件
- 帮同事写了几行代码,在 安装/卸载 程序里 注册/卸载 OCX控件
- Win7 下如何注册OCX控件 。0x80040200错误。