易语言超级列表框详细使用教程
区别：超级列表框和列表框；超级列表框有很多种显示形势给你设置，采集。
小编主要写了，批量导入、单个导入、复制、删除。（外加一个通用对话框的使用）
操作方法
- 01
【申明】由于内容太多，代码我以事先写好，在这里详细讲给你您【申明】 打开易语言 加入组件超级列表框 建立一个，导入的界面。主要一按钮、标签、编辑框组成 您可以参看图片，仿出来
- 02
现在开始设置、超级列表框。 加入报表列【编号、帐号、密码、邮箱】 类型选择【报表列表框】’用到的最多‘ 表头可单击【真】’方便选择 整行选择【真】‘顾名思义 显示表格线【真】’美观显示 加入一个菜单 加入一个通用对话组件‘过滤器器调成【*.txt】
- 03
咱们先写弹出菜单命令：菜单命令有删除、清空、单个导入、批量导入、批量导出 --------- 开始 先点击下超级列表框组件，然后查看他的所以事件，找到【右键单击表项】 载入，程序集1，开始写代码 代码如下，在下面写【弹出菜单 (菜单, , )】 ----------------------------------------------------------- ↓这个是格式说明↓ 调用格式： 〈无返回值〉 对象．弹出菜单 （菜单 欲弹出的菜单，［整数型 水平显示位置］，［整数型 垂直显示位置］） - 系统核心支持库->窗口 英文名称：PopupMenu 用于在窗口上的当前鼠标位置或指定坐标位置显示弹出式菜单，如果调用对象为窗口组件，则自动使用其所在的窗口。本命令为初级对象成员命令。 参数<1>的名称为“欲弹出的菜单”，类型为“菜单（menu）”。指定菜单内必须包含有子菜单，且所处窗口必须与调用对象窗口一致。 参数<2>的名称为“水平显示位置”，类型为“整数型（int）”，可以被省略。单位为像素点，相对于屏幕左边。如果被省略，将自动使用当前鼠标位置。 参数<3>的名称为“垂直显示位置”，类型为“整数型（int）”，可以被省略。单位为像素点，相对于屏幕顶边。如果被省略，将自动使用当前鼠标位置。 操作系统需求： Windows ------------------------------------------------------ .源码如下 版本 2 .程序集 窗口程序集_启动窗口 .子程序 _超级列表框1_右键单击表项 弹出菜单 (菜单, , )
- 04
弹出菜单命令写完，现在开始菜单事件。 我们已经知道菜单中有删除、清空、单个导入、批量导入、批量导出、命令 写命令直接点击菜单中的子菜单，即可添加菜单子程序。
- 05
咱们用的单个是用的，添加组件添加的。直接调用 按钮1添加即可 按钮1所指的就是加入项目
- 06
.版本 2 .支持库 iext .子程序 _按钮1_被单击 .局部变量 索引, 整数型 .如果 (编辑框1.内容 ≠ “” 且 编辑框2.内容 ≠ “” 且 编辑框3.内容 ≠ “”) 索引 ＝ 超级列表框1.插入表项 (, , , , , ) 超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1)) 超级列表框1.置标题 (索引, 1, 编辑框1.内容) 超级列表框1.置标题 (索引, 2, 编辑框2.内容) 超级列表框1.置标题 (索引, 3, 编辑框3.内容) 编辑框3.内容 ＝ “” 编辑框2.内容 ＝ “” 编辑框1.内容 ＝ “” .如果真 (选择框1.选中 ＝ 假) 分组框1.可视 ＝ 假 .如果真结束 .否则 信息框 (“信息没填完整”, 0, ) 源码如上，单个添加 ‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘
- 07
现在写，菜单【删除】 很简单的 源码如下 .版本 2 .支持库 iext .子程序 _删除_被选择 .如果真 (超级列表框1.现行选中项 ≠ -1) 超级列表框1.删除表项 (超级列表框1.现行选中项)
- 08
’现在写，菜单命令【批量导入】 源码如下 .版本 2 .支持库 iext .子程序 _批量导入_被选择 .局部变量 路径, 文本型 .局部变量 文本数组, 文本型, , "0" .局部变量 计次1, 整数型 .局部变量 计次2, 整数型 .局部变量 临时数组, 文本型, , "0" .局部变量 索引, 整数型 通用对话框1.类型 ＝ 0 通用对话框1.打开 () 路径 ＝ 通用对话框1.文件名 文本数组 ＝ 分割文本 (到文本 (读入文件 (路径)), #换行符, ) .计次循环首 (取数组成员数 (文本数组), 计次1) 索引 ＝ 超级列表框1.插入表项 (, , , , , ) 临时数组 ＝ 分割文本 (文本数组 [计次1], “----”, ) .计次循环首 (取数组成员数 (临时数组) ＋ 1, 计次2) .如果 (计次2 ≠ 1) 超级列表框1.置标题 (索引, 计次2 － 1, 临时数组 [计次2 － 1]) .否则 超级列表框1.置标题 (索引, 计次2 － 1, 到文本 (索引 ＋ 1)) .如果结束 .计次循环尾 () .计次循环尾 () ‘说明看图
- 09
‘现在写，菜单命令【批量导出】 源码如下 .版本 2 .支持库 iext .子程序 _批量导出_被选择 .局部变量 路径, 文本型 .局部变量 保存文本, 文本型 .局部变量 计次1, 整数型 .局部变量 计次2, 整数型 .如果真 (超级列表框1.取表项数 () ≠ 0) 通用对话框1.类型 ＝ 1 通用对话框1.打开 () 路径 ＝ 通用对话框1.文件名 .计次循环首 (超级列表框1.取表项数 (), 计次1) .计次循环首 (超级列表框1.取列数 (), 计次2) .如果真 (计次2 ＞ 1) .如果 (超级列表框1.取列数 () ≠ 计次2) 保存文本 ＝ 保存文本 ＋ 超级列表框1.取标题 (计次1 － 1, 计次2 － 1) ＋ “----” .否则 保存文本 ＝ 保存文本 ＋ 超级列表框1.取标题 (计次1 － 1, 计次2 － 1) .如果结束 .如果真结束 .计次循环尾 () 保存文本 ＝ 保存文本 ＋ #换行符 .计次循环尾 () 写到文件 (路径, 到字节集 (保存文本)) .如果真结束
- 10
最后就是菜单命令清空了 这个一样很简单 .版本 2 .支持库 iext .如果真 (超级列表框1.取表项数 () ≠ 0) .如果真 (信息框 (“清空后数据不可回复,是否确认清空”, 1, “重要操作【清空】”, ) ＝ #确认钮) 超级列表框1.全部删除 () .如果真结束 ’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’ 直接用 超级列表框1.全部删除 ()即可
- 11
最后测试，图片我压缩处理了，不清楚见谅