度量快速开发平台-专业、快速的软件定制快开平台

标题: 平台安装时写入注册表的打包方法 [打印本页]

作者: 张兴康 时间: 2020-2-24 16:51
标题: 平台安装时写入注册表的打包方法
最近根据客户要求，在用户下载办公系统安装包安装后，将直接从网页登陆，这需要在注册表中写入delit项，在此之前平台一直采用的是安装好后，从平台提供的登陆界面登陆然后在向注册表添加项。

要解决这个问题，只能在用户安装好客户端后就自动的向注册表写入delit项。下面是实现方法：
1、我们使用下图中所示工具进行安装包打包：

2、具体打包步骤可以参照http://plat.delit.cn/article-1-167.html
3、点击安装之后——双击结束安装——点击操作——选择On Preload事件，如下图所示：

4、在On Preload事件中插入下列代码：

--写注册表，支持网页调用客户端
result = Registry.DoesKeyExist(HKEY_CLASSES_ROOT, "Delit");
if (result) then
Registry.DeleteKey(HKEY_CLASSES_ROOT, "Delit");
end
Registry.CreateKey(HKEY_CLASSES_ROOT, "Delit");
Registry.CreateKey(HKEY_CLASSES_ROOT, "Delit\\DefaultIcon");
Registry.CreateKey(HKEY_CLASSES_ROOT, "Delit\\shell\\open\\command");
strPath = String.Concat(SessionVar.Expand("%AppFolder%"), "\\DLSOFT.exe");
Registry.SetValue(HKEY_CLASSES_ROOT,"Delit","","URL: Delit Protocol 协议",REG_SZ);
Registry.SetValue(HKEY_CLASSES_ROOT,"Delit","URL Protocol",strPath,REG_SZ);
Registry.SetValue(HKEY_CLASSES_ROOT,"Delit\\DefaultIcon","",String.Concat(strPath,",1"),REG_SZ);
Registry.SetValue(HKEY_CLASSES_ROOT,"Delit\\shell\\open\\command","",String.Concat("\"",String.Concat(strPath,"\" \"%1\"")),REG_SZ);

复制代码

作者: 万望 时间: 2020-3-28 22:45
作用具体，谢谢，我看到晕晕地

作者: 张兴康 时间: 2020-3-29 14:43

万望发表于 2016-4-28 22:45
作用具体，谢谢，我看到晕晕地

开头都说明了，这是安装是写入注册表

作者: 万望 时间: 2020-6-3 09:18
不错，不错哦

作者: 张兴康 时间: 2020-6-3 15:41

万望发表于 2016-8-3 09:18
不错，不错哦

开头不是还说看着晕晕的么

作者: 张兴康 时间: 2020-6-3 15:42

万望发表于 2016-8-3 09:18
不错，不错哦

开头不是还说看着晕晕的么

作者: shitou3389 时间: 2020-6-9 15:16
我想问问，平台在哪下啊，你们都是怎么下的

作者: 张兴康 时间: 2020-6-12 18:10

shitou3389 发表于 2016-8-9 15:16
我想问问，平台在哪下啊，你们都是怎么下的

你好，如果对平台感兴趣，可以加入：度量开发平台技术VIP 206081043 ；这个群，找群主或管理员给你平台包

作者: 张兴康 时间: 2020-6-12 18:16

shitou3389 发表于 2016-8-9 15:16
我想问问，平台在哪下啊，你们都是怎么下的

或者通过下面这个地址下载平台包： http://url.cn/291HQyy

作者: 万望 时间: 2020-7-7 22:57

作者: 张兴康 时间: 2020-7-12 15:30

万望发表于 2016-9-7 22:57

你这口钛合金牙，真够闪的，老值钱了吧

欢迎光临度量快速开发平台-专业、快速的软件定制快开平台 (http://bbs.delit.cn/)