call super::clicked;
string ls_registration
string ls_registration1
string ls_temp
string ls_temp1
string ls_temp2
integer i
integer j
boolean b_isok = false
b_isok = false
ls_registration = parent.st_r1.text
ls_registration1 = trim(parent.sle_l1.text) + "-" + trim(parent.sle_l2.text) + "-" + trim(parent.sle_l3.text) + "-" + trim(parent.sle_l4.text)
ls_registration = f_admissionnumber(ls_registration)
if ls_registration1 <> ls_registration then
messagebox(gs_msg_title,"对不起,您输入的许可号不正确,请重新输入!")
return 1
else
b_isok = true
end if
if b_isok then
setprofilestring(gs_syspath + "\\rocfly.ini","qxqp","licensekey",ls_registration1)
setprofilestring(gs_winpath + "\\rocfly.ini","qxqp","usetype","2")
setprofilestring(gs_syspath + "\\rocfly.ini","qxqp","usetype","2")
registryset("HKEY_LOCAL_MACHINE\Software\rocfly\qxqp","usetype",regstring!,"2")
messagebox(gs_msg_title,"恭喜您,您注册成功了,请重新启动系统!")
gs_usetype = "2"
parent.rocbool = true
close(w_registration)
else
messagebox(gs_msg_title,"对不起,您输入的许可号不正确,请重新输入!")
end if
return
WINDOWS目录下边有个 rocfly.ini 文件 软件安装目录下有个REG.DLL 文件 用Borland C++ DLL Method 2 写的 这个什么意思?
[培训]《安卓高级研修班(网课)》月薪三万计划,掌握调试、分析还原ollvm、vmp的方法,定制art虚拟机自动化脱壳的方法