易语言怎么添加画板

发布网友发布时间：2022-05-06 18:35

共4个回答

热心网友时间：2022-07-01 18:46

.版本 2

.子程序生成验证码, 文本型, , 在指定画板上画出验证码并返回验证码
.参数画板, 画板, , 要画验证码的画板
.参数长度, 整数型, , 验证码的长度
.参数类型, 整数型, 可空, 验证码的类型，1是数字，2是字母，3是数字+字母，其他是随机选择
.局部变量验证码, 文本型
.局部变量计次, 整数型
.局部变量计次2, 整数型
.局部变量横, 整数型
.局部变量随机数字, 文本型
.局部变量随机字母, 文本型
.局部变量随机数字加字母, 文本型

.如果真 (长度＞ 0)
画板.清除 (, , , )
画板.字体.字体大小＝取随机数 (20, 23)
置随机数种子 ()
.计次循环首 (长度, )
随机数字＝随机数字＋到文本 (取随机数 (0, 9))
.计次循环尾 ()
.计次循环首 (长度, )
随机字母＝随机字母＋选择 (取随机数 (1, 2) ＝ 1, 到大写 (字符 (取随机数 (97, 122))), 字符 (取随机数 (97, 122)))
.计次循环尾 ()
.计次循环首 (长度, )
随机数字加字母＝随机数字加字母＋选择 (取随机数 (1, 2) ＝ 1, 取文本中间 (随机数字, 取随机数 (1, 长度), 1), 取文本中间 (随机字母, 取随机数 (1, 长度), 1))
.计次循环尾 ()
验证码＝多项选择 (选择 (类型＞ 0 且类型＜ 4, 类型, 取随机数 (1, 3)), 随机数字, 随机字母, 随机数字加字母)
.如果真结束
.计次循环首 (画板.宽度, 计次)
.如果真 (取随机数 (1, 3) ＝ 1)
.计次循环首 (画板.高度, 计次2)
.如果真 (取随机数 (1, 10) ＝ 1)
画板.画点 (计次, 计次2, 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255)))
.如果真结束

.计次循环尾 ()
.如果真结束

.计次循环尾 ()
.如果真 (长度＞ 0)
.计次循环首 (长度, 计次)
横＝取随机数 (横＋计次 × 3 ＋ 5, 横＋ 20 ＋长度)
输出调试文本 (横, “”)
画板.文本颜色＝取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))
画板.字体.角度＝取随机数 (0, 500)
画板.定位写出 (横, 取随机数 (23, 画板.高度－ 23), 取文本中间 (验证码, 计次, 1))
.计次循环尾 ()
.如果真结束
返回 (验证码)

热心网友时间：2022-07-01 18:46

点画板组键，再添加进去就行了

热心网友时间：2022-07-01 18:47

就是这个

热心网友时间：2022-07-01 18:48

.版本 2

.子程序 _按钮1_被单击

画板1.滚动写行 (文本变量)

.子程序 _时钟1_周期事件

文本变量＝到文本 (读入文件 (“需要读取的文本”))
_按钮1_被单击 ()

变量自己声明。文本型就OK。时钟周期为2000