自绘界面herovp易模块精简版桌面工具集

易语言 2020-08-23 16:46:53

自绘界面herovp易模块精简版桌面工具集

.如果真 (文件是否存在 (取运行目录 () + “\” + “配色.ini”))
读入配色文件 = 到文本 (读入文件 (取运行目录 () + “\” + “配色.ini”))
配色方案 = 分割文本 (读入配色文件, #换行符, )
.如果真 (取数组成员数 (配色方案) = 2)
背景颜色 = RGB2ARGB (到整数 (配色方案 [1]))
文字颜色 = RGB2ARGB (到整数 (配色方案 [2]))
.如果真结束

.如果真结束
.如果真 (文字颜色 = 0)
文字颜色 = RGB2ARGB (#黑色)
.如果真结束
.如果真 (背景颜色 = 0)
背景颜色 = RGB2ARGB (#白色)

H窗口.挂接皮肤 (hWnd, , 背景颜色, #标题栏_标题 + #标题栏_皮肤按钮 + #标题栏_关闭按钮 + #标题栏_设置按钮, 100, , , , 真, 假, , )
H窗口.置进入特效 (#特效_渐隐_迅雷)
H窗口.置退出特效 (#特效_渐隐_自下向上)
' 绘制控件-----------------------------
H图片.创建 (hWnd, 20, 50, 40, 40, H日图标, , , , )
H今日天气标签.创建 (hWnd, H日白天 + “ ” + H日最低 + “~” + H日最高 + “ ” + H日风力, 73, 48, 300, 20, 文字颜色, , , , , , , , , , , , , )
H列框.创建 (hWnd, 20, 93, 236, 148, 文字颜色, , , , , , , , 0, 1, #边框_虚线式, )
H列框.插入列 (1, “记事簿”, 230, , , )
H列框.重画 ()
H文框.创建 (hWnd, “在此输入今日工作!”, 20, 245, 182, 24, 真, #输入方式_通常方式, , 文字颜色, , , , , #边框_虚线式, )
H按钮.创建 (hWnd, “添加”, 205, 245, 52, 24, 文字颜色, , 12, , , , )
' 控件事件------------------------------
H窗口.通用事件_左键单击 (&窗口左键单击)
H按钮.挂接事件 (#事件_左键单击, &添加按钮被单击)
H列框.挂接事件 (#事件_左键双击, &表项被双击)