1、首先,准备好测试文件(文件随意),这里不强求使用某个文件,只是为了配合此次测试而已。
2、运行易语言主程序,在d出的新建工程文件对话框中,选择Windows窗口程序然后点击确定按钮,进入Windows窗口程序设计界面。
3、在已经创建的Windows窗口程序的窗口上,绘制标签组件、编辑框组件及拖放对象各一个并调整他们的位置以适应窗口。
4、修改各组件的相关属性、将各组件规范命名,为后续的代码编写做准备。好的命名习惯会使得你的编程速度更加快速和得心应手。
5、然后,就进入代码编写阶段了。首先,需要注册一下拖放对象,然后将拖放对象的接收文件属性设置为真,编写相应代码。
6、代码编写完毕,进入测试阶段。果断猛戳F5键,运行程序。将测试文件,拖拽至程序的编辑框中,查看编辑框的内容是否发生了变化。
添加组件:数据源、数据源提供者
=========================================
.版本 2
.程序集 窗口程序集1
.程序集变量 i, 整数型
.子程序 __启动窗口_创建完毕
编辑框1.是否允许多行 = 真
数据库提供者1.数据库文件名 = “D:\123.edb”
数据源1.数据提供者 = “数据库提供者1”
编辑框1.加入文本 (“用户名 密码”)
.计次循环首 (数据源1.取行数 (), i)
编辑框1.加入文本 (#换行符)
编辑框1.加入文本 (数据源1.取文本 (i, 1) + “ ” + 数据源1.取文本 (i, 2))
.计次循环尾 ()
我的是这样弄的:.版本 2
.支持库 iext
.子程序 _主窗口_创建完毕
.如果 (文件是否存在 (取运行目录 () + “\data\” + “特种设备台账.edb”) = 假)
信息框 (“数据表不存在!”, 16, “提示”)
.否则
打开 (取运行目录 () + “\data\” + “特种设备台账.edb”, , , 4, , “”, )
.如果结束
_监控时钟_周期事件 ()
读取行 ()
透明标签1.左边 = 主窗口.宽度 - 透明标签1.宽度 - (选择夹1.宽度 - 透明标签1.宽度) ÷ 2
当前时间.时钟周期 = 1000
.版本 2
.支持库 eGrid
.子程序 读取行
.局部变量 变量1, 整数型
高级表格.置列宽 (1, 20)
高级表格.置数据 (0, 1, 1, “序号”)
高级表格.置列宽 (2, 100)
高级表格.置数据 (0, 2, 1, “设备名称”)
高级表格.置列宽 (3, 100)
高级表格.置数据 (0, 3, 1, “单位内编码”)
高级表格.置列宽 (4, 100)
高级表格.置数据 (0, 4, 1, “规格型号”)
高级表格.置列宽 (5, 100)
高级表格.置数据 (0, 5, 1, “安装部位”)
高级表格.置列宽 (6, 100)
高级表格.置数据 (0, 6, 1, “使用证编号”)
高级表格.置列宽 (7, 100)
高级表格.置数据 (0, 7, 1, “年度检验日期”)
高级表格.置列宽 (8, 100)
高级表格.置数据 (0, 8, 1, “年度检验有效期”)
高级表格.置列宽 (9, 100)
高级表格.置数据 (0, 9, 1, “定期检验日期”)
高级表格.置列宽 (10, 100)
高级表格.置数据 (0, 10, 1, “定期检验有效期”)
高级表格.置列宽 (11, 100)
高级表格.置数据 (0, 11, 1, “安装就位日期”)
高级表格.置列宽 (12, 100)
高级表格.置数据 (0, 12, 1, “报废停用日期”)
高级表格.置列宽 (13, 100)
高级表格.置数据 (0, 13, 1, “重大维修日期”)
.计次循环首 (取记录数 (), 变量1)
跳到 (变量1)
高级表格.插入行 (“”, 高级表格.行数)
高级表格.置数据 (高级表格.行数 - 1, 1, 1, 读 (1))
高级表格.置数据 (高级表格.行数 - 1, 2, 1, 读 (2))
高级表格.置数据 (高级表格.行数 - 1, 3, 1, 读 (3))
高级表格.置数据 (高级表格.行数 - 1, 4, 1, 读 (4))
高级表格.置数据 (高级表格.行数 - 1, 5, 1, 读 (5))
高级表格.置数据 (高级表格.行数 - 1, 6, 1, 读 (6))
高级表格.置数据 (高级表格.行数 - 1, 7, 1, 读 (7))
高级表格.置数据 (高级表格.行数 - 1, 8, 1, 读 (8))
高级表格.置数据 (高级表格.行数 - 1, 9, 1, 读 (9))
高级表格.置数据 (高级表格.行数 - 1, 10, 1, 读 (10))
高级表格.置数据 (高级表格.行数 - 1, 11, 1, 读 (11))
高级表格.置数据 (高级表格.行数 - 1, 12, 1, 读 (12))
高级表格.置数据 (高级表格.行数 - 1, 13, 1, 读 (13))
.计次循环尾 ()
编号排序 ()
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)