相信有很多编程爱好者玩易语言,可是易语言怎样读取系统信息呢?
工具/原料
精易模块
易语言
1.建立结构
1、新建Windows窗口程序
2、载入精易模块
3、建立4个窗口
4、加入一个全局变量
2.主窗口(_启动窗口)排版
1、一稍僚敉视个好的软件一定会有让人喜欢的版式,大家可以根据自己的喜爱来排以下组件:软件名标签,开始扫描按钮,上次扫描时间标签,生成txt文件按钮,截图保存按钮,复制信息按钮,显示系统信息编辑框。(也可以参考下图)
2、显示扫描结果编辑框(编辑框1)的参数设置:是否允许多行=真滚动条=纵向滚动条对齐方式=居中 或 左对齐
3、软件名标签(标签1)参数设置:标题=系统配置扫描器字体大小=二号(22)
3.主窗口(_启动窗口)编程
1、注意:主窗口=_启动窗口按钮1=开始扫描按钮按钮2=复制信息按钮按钮3=截图保存按钮按钮4=生成txt文件按钮标签1=软件名标签标签2=上次扫描时间标签编辑框1=显示扫描结果编辑框
2、在_启动窗口_创建完毕下写代码(复制粘贴就行):.版本 2.程序集 窗口程序集_启咿蛙匆盗动窗口.子程序 __启动窗口_创建完毕.如果 (文件是否存在 (“c:\系统配置扫描器\文件.t旌忭檀挢xt”) = 假) 标签2.标题 = “(没有扫描过哦)” 按钮2.禁止 = 真 按钮3.禁止 = 真 按钮4.禁止 = 真.否则 标签2.标题 = “(” + “上次扫描:” + 到文本 (取文件时间 (“c:\系统配置扫描器\文件.txt”)) + “)” 编辑框1.内容 = 到文本 (读入文件 (“c:\系统配置扫描器\文件.txt”)) 按钮2.禁止 = 假 按钮3.禁止 = 假 按钮4.禁止 = 假
3、在_按钮1_被单击下写代码(复制粘贴就行):.版本 2.子程序 _按钮1_被单击.如果 (文件是否存在 (“c:\系统配置扫描器\文件.txt”) = 假) 按钮1.禁止 = 真 按钮1.标题 = “正在扫描...” 延时 (1000) 创建目录 (“c:\系统配置扫描器”) 写到文件 (“c:\系统配置扫描器\文件.txt”, 到字节集 (系统_取系统信息1 ())) a = 系统_取系统信息1 () 延时 (1000) 标签2.标题 = “(” + “上次扫描:” + 到文本 (取文件时间 (“c:\文件.txt”)) + “)” 编辑框1.内容 = a.否则 按钮1.禁止 = 真 按钮1.标题 = “正在扫描...” 写到文件 (“c:\系统配置扫描器\文件.txt”, 到字节集 (系统_取系统信息1 ())) 按钮1.禁止 = 真 按钮1.标题 = “开始扫描” 标签2.标题 = “(没有扫描过哦)” 标签2.标题 = “(” + “上次扫描:” + 到文本 (取文件时间 (“c:\系统配置扫描器\文件.txt”)) + “)”.如果结束按钮2.禁止 = 假按钮1.标题 = “开始扫描”按钮1.禁止 = 假按钮3.禁止 = 假按钮4.禁止 = 假信息框 (“读取成功”, 0, , )
4、在_按钮2_被单击下写代码(复制粘贴就行):.版本 2剪辑板_置文本 (编辑框1.内容)信息框 (“复制成功”, 0, , )
5、在_按钮3_被单击下写代码(复制粘贴就行):载入 (窗口1, , 假)
6、在_按钮4_被单击下写代码(复制粘贴就行):载入 (窗口2, , 假)
4.窗口1排版
1、放入2个标签,2个编辑框,2个按钮
5.窗口1编程
1、注意:标签1=欲保存地址标签标签2=欲保存文件名标签编辑框1=欲保存地址编辑框编辑框2=欲保存文件名编辑框按钮1=浏览文件夹(选择保存地址)按钮按钮2=保存按钮
2、在_按钮1_被单击下写代码(复制粘贴就行):.版本 2.支持库 shell.子程序 _按钮1_被单击编辑框1.内容 = 浏览文件夹 (“请选择欲保存的目录”, )
3、在_按钮2_被单击下写代码(复制粘贴就行):.版本 2.子程序 _按钮2_被单击.愁抉痊歪局部变量 ac, 文本型.局部变量 b, 文本型.如果 (编辑框1.内容 = “”) 信息框 (“请选择文件夹”, 0, , ).否则 ac = “真”.如果结束.如果 (编辑框2.内容 = “”) 信息框 (“请输入文件名”, 0, , ).否则 b = “真”.如果结束.如果 (ac = “真” 且 b = “真”) 载入 (窗口3, , 假)
6.窗口2排版
1、在窗口2放入2个标签,2个编辑框,2个按钮
7.窗口2编程
1、注意:标签1=欲保存地址标签标签2=欲保存文件名标签编辑框1=欲保存地址编辑框编辑框2=欲保存文件名编辑框按钮1=浏览文件夹(选择保存地址)按钮按钮2=保存按钮
2、在_按钮1_被单击下写代码(复制粘贴就行):.版本 2.支持库 shell.子程序 _按钮1_被单击编辑框1.内容 = 浏览文件夹 (“请选择欲保存的目录”, )
3、在_按钮2_被单击下写代码(复制粘贴就行):.版本 2.子程序 _按钮2_被单击.愁抉痊歪局部变量 ac, 文本型.局部变量 b, 文本型.如果 (编辑框1.内容 = “”) 信息框 (“请选择文件夹”, 0, , ).否则 ac= “真”.如果结束.如果 (编辑框2.内容 = “”) 信息框 (“请输入文件名”, 0, , ).否则 b = “真”.如果结束.如果 (ac = “真” 且 b = “真”) 写到文件 (编辑框1.内容 + “\” + 编辑框2.内容 + “.txt”, 到字节集 (_启动窗口.编辑框1.内容)).否则.如果结束.如果 (写到文件 (编辑框1.内容 + “\” + 编辑框2.内容 + “.txt”, 到字节集 (_启动窗口.编辑框1.内容)) = 真) 信息框 (“保存成功,已保存在” + 编辑框1.内容, 0, , ).否则 信息框 (“保存失败,请检查信息是否填写正确”, 0, , )
8.窗口3排版
1、窗口3比较特殊,窗口3是用来截图拍照的,为了显软件专业一点。
2、在窗口3加入一个图片框(用来放图标的,不想放图标也可以不用加入)二个透明标签一个编辑框(拉长一点)一个按钮
9.窗口3编程
1、在_窗口3_创建完毕下写代码(复制粘贴就行):.版本 2.子程序 _窗口3_创建完毕编辑框1.内容 = _启动窗口.编辑框1.内容
2、在_按钮1_被单击下面写代码(复制粘贴就行):.版本 2.子程序 _按钮1_被单击老揉孟阼写到文件 (窗口1.编辑框1.内容 + “\” + 窗口1.编辑框2.内容 + “.jpg”, 快照 (分组框1.取窗口句柄 (), 分组框1.宽度, 分组框1.高度)).如果 (写到文件 (窗口1.编辑框1.内容 + “\” + 窗口1.编辑框2.内容 + “.jpg”, 快照 (分组框1.取窗口句柄 (), 分组框1.宽度, 分组框1.高度)) = 真) 信息框 (“保存成功,已保存在” + 窗口1.编辑框1.内容, 0, , ) 窗口3.销毁 ().否则 信息框 (“保存失败,请检查信息是否填写正确”, 0, , ) 窗口3.销毁 ()
10.结束
1、这样一个系统配置扫描器就编好了