PB实现自动判断并注册Dll/OCX控件

关注

VIP免费原创最新推荐文章于 2024-04-28 11:21:02 发布 7.6k 阅读 AI 写同款· GEO 优化 ›

powerbuilder调用dsoframer.ocx组件及操作 pb内嵌word组件及操作首先下载dsoframer.ocx http://download.csdn.net/download/wolfalcon/9397898 解压后DsoFramer_KB311765_x86.exe直接安装是1.3版本。文件夹内.ocx文件是2.2版本。如需2.2版本可以将文件拷入32位系统c:\windows\system32下，64位系统c:\windows\syswow64下而后阅读详情

如果在程序中使用了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，这个可以从注册表中查到，注册之前先判断一下是否已经注册，如果没有注册，则进行注册，举例如下：

str