按键精灵OCX独立界面教程讲解

  • 格式:doc
  • 大小:1.64 MB
  • 文档页数:39

OCX独立界面制作教程目录OCX独立界面添加注册功能 (2)OCX独立界面添加解绑功能 (14)OCX独立界面添加试用功能 (17)设置OCX独立界面各按钮的有效性(优化) (20)OCX独立界面添加启动脚本功能 (22)OCX独立界面添加暂停继续功能 (25)OCX独立界面添加中止脚本功能 (28)OCX独立界面添加保存设置功能 (30)OCX独立界面添加热键修改设置 (33)OCX独立界面使用的命令说明 (36)OCX独立界面添加注册功能1、打开VB程序,选择新建一个ActiveX控件,如图2、(重要)选择菜单栏上的”工程” - “添加模块”,依次添加我们的两个必需模块”Helper.bas”和”ModsetHotKey”,如图:3、选择标签控件,在界面框上添加一个标签说明,如图:在对应属性框设置标题属性为”注册码:”,其余保持默认不变,如图:4、选择文本框控件在界面上添加一个文本框,如图在对应属性框设置名称属性为”RegCode”,其余保存默认不变,如图5、选择下拉框控件,在界面上添加一个下拉框,如图:修改对应名称属性为”RegServer”,列表属性为”电信一/网通一/电信二/美国一”,其余保持默认不变,如图:6、选择按钮控件,在界面添加一个按钮,如图:修改对应属性面板的名称为” BeginRegister”,标题为”注册”,其余保持默认不变,如图7、双击注册按钮,跳转到按钮点击事件,如图:在上面添加如下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)。

:8、点击菜单栏“文件”–“保存工程”将工程保存为” MiniMacroUI.ctl”和” MiniMacroUI.vbp”,如下图9、点击菜单栏“文件”–“生成MiniMacroUI.ocx”,提示成功后在按键上属性面板设置界面里选择”选择OCX界面”,如下图:10、点击发布按钮上的小三角,选择制作按键小精灵。

如下图11、在制作页面上选择【商业型独立型界面】,如下图:12、切换到更多设置面版,主要设置作者账号、作者密码及小精灵编号13、点击“立即制作”按钮,保存小精灵。

如下图:14、提下示制作成功后打开新生成的小精灵。

界面如下15、在输入框内填入小精灵注册码(注册码通过小精灵作者软件注册系统后台获取),如下图16、点击注册按钮,提示软件激活成功后弹出提示框注册成功。

如下图(OCX独立界面添加注册功能讲解完毕)OCX独立界面添加解绑功能1、在界面上添加一个按钮,在属性界面上把名称改为“解绑按钮”,名称更改为”ClearRegister”,标题改为“解绑”。

如下图2、双击“解绑”按钮,来到代码编辑界面。

如下图3、在“解绑”按钮的点击事件里面添加以下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)。

4、发布生成新的小精灵并打开成功注册小精灵(详细步骤参考给OCX独立界面添加注册功能中的第9到13步)。

点击解绑按钮,小精灵正常退出表示解绑成功。

(OCX独立界面添加解绑功能讲解完毕)OCX独立界面添加试用功能1、在界面上添加一个按钮,在属性界面上把名称改为“试用按钮”,标题改为“试用”。

如下图2、双击“试用”按钮,跳转到代码编辑界面。

如下图:3、在“试用”按钮的点击事件里面添加以下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)4、发布生成新的小精灵并打开小精灵(详细步骤参考OCX独立界面添加注册功能中的第9到13步)。

点击试用按钮,弹出激活成功。

如下图(OCX独立界面添加试用功能讲解完毕)设置OCX独立界面各按钮的有效性(优化)注册码输入框注册服务器下拉框注册按钮解绑按钮试用按钮注册成功无效无效无效有效无效注册失败有效有效有效无效有效在对应属性页面设置时钟的时间间隔为”500”,如下图3、双击时钟控件,跳转到代码编辑页面。

如下图:3、在时钟事件里添加如下代码,如下图4、发布生成新的小精灵并打开小精灵(详细步骤参考OCX独立界面添加注册功能中的第9到13步)。

(设置OCX独立界面按钮有效性讲解完毕)OCX独立界面添加启动脚本功能1、在界面上添加一个按钮,在属性界面上把名称改为“启动按钮”,标题改为“启动”。

如下图2、双击“启动”按钮,跳转到代码编辑界面。

如下图3、在“启动”按钮的点击事件里面添加以下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)。

3、给脚本添加一行简单的弹出框命令,如下图:4、发布生成新的小精灵并打开成功注册小精灵(详细步骤参考OCX独立界面添加注册功能中的第9到13步)。

在小精灵注册成功后点击启动按钮,提示脚本启动功能。

如下图(OCX独立界面添加启动脚本功能讲解完毕)OCX独立界面添加暂停继续功能1、在界面上添加一个按钮,在属性界面上把名称改为“暂停继续按钮”,标题改为“暂停/继续”。

如下图2、双击“暂停继续”按钮,跳转到代码编辑界面。

如下图3、在“暂停继续”按钮的点击事件里面添加以下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)。

4、给脚本添加一些简单的命令,如下图5、发布生成新的小精灵并打开成功注册小精灵(详细步骤参考OCX独立界面添加注册功能中的第9到13步)。

在小精灵注册成功后启动脚本测试“暂停继续”按钮。

(独立界面添加暂停继续功能讲解完毕)OCX独立界面添加中止脚本功能1、在界面上添加一个按钮,在属性界面上把名称改为“中止按钮”,标题改为“中止”。

如下图2、双击“中止”按钮,跳转到代码编辑界面。

如下图3、在“中止”按钮的点击事件里面添加以下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)。

4、发布生成新的小精灵并打开成功注册小精灵(详细步骤参考OCX独立界面添加注册功能中的第9到13步)。

在小精灵注册成功后启动脚本测试“中止”按钮。

(OCX独立界面添加中止脚本功能讲解完毕)OCX独立界面添加保存设置功能1、在界面上添加一个按钮,在属性界面上把名称改为“保存配置按钮”,标题改为“保存配置”。

如下图2、在界面添加一个文本输入框,如下图3、双击“保存配置设置”按钮,跳转到代码编辑界面。

如下图:3、在“保存配置设置”按钮的点击事件里面添加以下代码(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)4、修改脚本代码,如下图:5发布生成新的小精灵并打开成功注册小精灵(详细步骤参考OCX面添加注册功能中的第9到13步)精灵注册成功后启动脚本测试“保存配置钮。

(OCX面添加保存设置功能讲解完毕)OCX独立界面添加热键修改设置1、选择菜单栏”工程”–“添加窗体”新增一个窗体” FrmSetHotKey.frm”,如下图2、返回UserControl1控件,新增一个按钮控件,属性名称修改为”修改热键按钮”,标题修改为”修改热键”,其他属性保存不变,如下图:3、双击“修改热键”按钮,跳转到代码编辑页面,如下图:4、在”修改热键”按钮事件中增加以下代码,如下图(单引号开始绿色字体表示代码注释,可不需要添加,不影响界面效果)5、发布生成新的小精灵并打开成功注册小精灵(详细步骤参考OCX独立界面添加注册功能中的第9到13步)。

在小精灵注册成功后启动脚本测试“修改热键”按钮。

(OCX独立界面添加修改热键功能讲解完毕)OCX独立界面使用的命令说明命令名称NotifyCommand命令功能发送消息到小精灵(模块:Helper.bas)命令参数参数1 整型,指定附加信息1代表:注册2代表:解绑3代表:写入界面配置8代表:登陆模式参数2 长整型,指定附加消息不使用时设置为0返回值无脚本例子按键精灵8及以上语法1.例子1:2.'自定义结构体3.Type RegisterCommandParam4. SelectedServer As Integer '服务器5. RegisterCode As String '注册码6.End Type7.Dim RegisterParam As RegisterCommandParam8.RegisterParam.SelectedServer = 0 '服务器选择电信一9.RegisterParam.RegisterCode = “ABCDEFG” '小精灵注册码10.Call NotifyCommand(1, VarPtr(RegisterParam)) '通知小精灵进行注册11.例子2:12.Call NotifyCommand(2, 0) '通知小精灵进行解绑注销13.例子3:14.Call NotifyCommand(3, 1) '通知小精灵写入第1个脚本配置15.例子4:16.Call NotifyCommand(8, False) '通知小精灵弹出用户中心/登陆/充值框17.例子5:18.Call NotifyCommand(8, True) '通知小精灵自动登陆19.命令名称按钮热键命令功能向小精灵发送热键消息(模块:ModSetHotKey.bas)命令参数参数1 整数型,脚本编号,从0开始参数2 整数型,热键类型0:启动热键1:暂停热键2:停止热键3.所有脚本中止热键返回值无脚本例子按键精灵8及以上语法1.例子1:2.Call 按钮热键(0, 0) '向第1个脚本发送启动消息3.例子2:4.Call 按钮热键(0, 2) '向第1个脚本发送停止消息命令名称SaveControlData 命令功能保存控件数据(模块:Helper.bas) 命令参数参数1 字符型,名称参数2 字符型,保存内容返回值无脚本例子按键精灵8及以上语法1.例子1:2.ClearControlData '清除残留值3.SaveControlData "Text1", Text1 '保存Text1的值4.例子2:5.ClearControlData '清除残留值6.SaveControlData "DuoXuan1", CStr(Check1.Value) '保存Check1的值命令名称SaveControlData 命令功能保存控件数据(模块:Helper.bas) 命令参数参数1 字符型,名称返回值字符型保存的内容脚本例子按键精灵8及以上语法1.例子1:2.Text1 = LoadControlData("Text1") '读取Texe1的内容3.例子2:4.Check1.Value = LoadControlData("DuoXuan1") '读取DuoXuan1的内容。