| 5、在“读取注册信息”计算图标下放置一个决策图标,属性设置同第2步,只是将变量path换为path1即可。
在决策图标右侧放置两个群组图标,将它们分别命名为“已注册”和“未注册”,其中“已注册”为空群组,不需设定。
6、打开“未注册”群组图标,在其第三级流程线上放置三个显示图标并分别命名为“显示机器码”、“注册声明”和“按钮”。打开“显示机器码”显示图标,在其中适当位置输入“本机的机器码为:{g_ma} 识别码为:{sb_ma}”(不包括双引号,大括号要在英文状态下输入。)和相关信息。
(友情提醒:点击“文本”→“定义风格(D)…”或按“Ctrl”+“Shift”+“Y”快捷键,在打开的定义风格对话框中新建一风格,并将数字格式对话框中的“显示数千\u25968数百万隔离”复选框前的勾去掉,以防在千分位显示逗号),至于“注册声明”图标中的内容,各位可以自由发挥。而“按钮”显示图标中的内容是图1中的三个按钮文本信息,在下面用热区交互响应。
选中“显示机器码”显示图标,按“ctrl+=”快捷键,在随后弹出的计算图标中输入以下内容:
sntext:=ReadExtFile(FileLocation^"\hwreg.txt")--读取原始注册信息
l:=ReadExtFile(FileLocation^"\trynum.txt")--读取试用次数信息并赋值给L
if l<10 then--加这一语句主要是为了获得用户使用次数,使程序更真实、贴近实际。为此,我可是费了一番周折的哟。
x_path:=1
else
x_path:=2
end if
7、在下面加入一个决策图标,设置同上,只是将变量改为x_path即可。在其右侧分别放置一个“画线”计算图标和一个空群组图标,在计算图标中输入以下内容:
SetFrame(1,16711680)--设置线的颜色
if l<0 then l:=0--当l<0时,l值始终为0
Line(14,30,213,11+(10-l)*19,213)--画线,线的位置看情况而定。
在决策图标下再放置一个显示图标,在其中输入:剩余{l}次使用机会,用于显示剩余次数。
8、在“剩余次数”显示图标下放置一个“注册码输入”交互图标,将其属性设置为“更新变量”和“最优显示”,其余默认。打开“注册码输入”交互图标,再要显示用户注册码输入信息的地方输入:{snDisplayed},也就是图1中的输入注册码方框处。
交互图标右边的第一按?响应图标“Backspace”属性设置如下:激活条件为CharCount(snDisplayed)>0,擦除为“在下一次输入之后”。
其计算图标输入的内容如下:
snEntry:=SubStr(snEntry,1,CharCount(snEntry)-1)
snDisplayed:=SubStr(snDisplayed,1,CharCount(snDisplayed)
9、交互图标右边的第一按?响应图标“?”属性设置如下:激活条件为CharCount(snDisplayed)<9(用于控制用户输入的最大字符数),擦除为“在下一次输入之后”。
其计算图标输入的内容如下:
snEntry:=snEntry^Key--自定义变量snEntry用于存放用户输入信息
snDisplayed:=snDisplayed^"*"--“*”为密码显示字符
10、“注册”热区交互属性设置为:永久交互、激活条件为ok<>1、退出交互。
其计算图标中的内容为:
if snEntry=sntext then--判断注册码信息与用户输入信息是
此信息共有2页 1 2 下一页 |