9点连线屏幕锁软件电脑版

易语言 2020-08-20 12:45:39

9点连线屏幕锁软件电脑版

.计次循环首 (5, i)
调试输出 (局_x [i], 局_y [i])
画圈圈 (局_x [i], 局_y [i], #白色, 局_color [i], #白色, #白色)
延迟 (500)
重绘画板 ()
.计次循环尾 ()

背景透明 = 到数值 (读配置项 (取运行目录 () + “\Config.ini”, “屏幕锁配置”, “背景透明”, ))
.判断开始 (背景透明 = 0)
背景色 = 到数值 (读配置项 (取运行目录 () + “\Config.ini”, “屏幕锁配置”, “背景颜色”, ))
画板1.画板背景色 = 背景色
.默认
画板1.画板背景色 = #白色
.判断结束

初始化_九宫格 (外圈颜色, 中圈颜色, 内外环颜色, 内芯颜色)

' 移动 (主窗口.左边 + 主窗口.宽度, (主窗口.高度 - 高度) ÷ 2 + 主窗口.顶边, , )
.计次循环首 (3, i)
text1 = 多项选择 (i, “常规_”, “绘制_”, “错误_”)
' 调试输出 (text)
.计次循环首 (4, j)
text2 = 多项选择 (j, “外圈颜色”, “中圈颜色”, “内外环颜色”, “内芯颜色”)
' 调试输出 (text1 + text2)
程_颜色 [i] [j] = 到数值 (读配置项 (取运行目录 () + “\Config.ini”, “屏幕锁配置”, text1 + text2, ))
' 调试输出 (程_颜色 [i] [j])
.计次循环尾 ()
.计次循环尾 ()
' ----------------------------------
锁屏背景 = 读配置项 (取运行目录 () + “\Config.ini”, “屏幕锁配置”, “锁屏背景”, )
' 调试输出 (锁屏背景)
.如果真 (锁屏背景 ≠ “”)
图片框_背景.图片 = 读入文件 (锁屏背景)
.如果真结束
程_锁屏背景 = 锁屏背景