锐浪类模块源码支持C/S报表与WEB报表开发

.如果 (文件是否存在 (控件路径)) ' 如果指定控件不存在，程序就会出错，所以在这里要判断一下。
dll句柄 ＝ 载入动态链接库_API (控件路径)
函数句柄 ＝ 取进程地址_API (dll句柄, “DllRegisterServer”)
.如果真 (函数句柄 ＝ 0)
释放动态链接库_API (dll句柄)
信息框 (“在动态链接库无法找到（DllRegisterServer）命令！”, 0, “提示”)
返回 (-1)
.如果真结束
释放动态链接库_API (dll句柄)
DLL命令调用转向 (控件路径, )
返回值 ＝ 注册OCX ()
DLL命令调用转向 (, )
.如果 (返回值 ＝ 0)
返回 (0)
.否则
返回 (-1)
.如果结束

.否则
返回 (-1)
.如果结束
返回 (0)

.如果 (文件是否存在 (控件路径)) ' 如果指定控件不存在，程序就会出错，所以在这里要判断一下。
dll句柄 ＝ 载入动态链接库_API (控件路径)
函数句柄 ＝ 取进程地址_API (dll句柄, “DllUnregisterServer”)
.如果真 (函数句柄 ＝ 0)
释放动态链接库_API (dll句柄)
信息框 (“在动态链接库无法找到（DllUnregisterServer）命令！”, 0, “提示”)
返回 (-1)
.如果真结束
释放动态链接库_API (dll句柄)
DLL命令调用转向 (控件路径, )
返回值 ＝ 卸载OCX ()
DLL命令调用转向 (, )
.如果 (返回值 ＝ 0)
信息框 (“卸载” ＋ 取文本右边 (控件路径, 取文本长度 (控件路径) － 倒找文本 (控件路径, “\”, , 假)) ＋ “控件成功”, #信息图标, “成功！”)
.否则
信息框 (“卸载” ＋ 取文本右边 (控件路径, 取文本长度 (控件路径) － 倒找文本 (控件路径, “\”, , 假)) ＋ “控件失败”, #错误图标, “错误！”)
返回 (-1)
.如果结束
' 输出调试文本 (到文本 (返回值))
.否则
信息框 (“指定” ＋ 取文本右边 (控件路径, 取文本长度 (控件路径) － 倒找文本 (控件路径, “\”, , 假)) ＋ “控件不存在！”, #错误图标, “错误！”)
返回 (-1)
.如果结束
返回 (0)