|
发表于 2025-7-27 23:12:55
|
显示全部楼层
河北省秦皇岛市
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 搜索计时器 | 整数型 | | 正在搜索 | 逻辑型 | | 当前页 | 整数型 | | 每页条数 | 整数型 | | 总记录数 | 整数型 | | 搜索关键词 | 文本型 | |
搜索计时器 = 时钟_创建 (300 ) 时钟_绑定事件 (搜索计时器, &搜索防抖处理 )每页条数 = 20 当前页 = 1 超级列表框1.整行选择 = 真 超级列表框1.网格线 = 真 超级列表框1. 插入列 (0, “ID”, 50 )超级列表框1. 插入列 (1, “标题”, 400 )超级列表框1. 插入列 (2, “时间”, 150 ) 时钟_重置 (搜索计时器 )搜索关键词 = 编辑框1.内容 如果真 (正在搜索 ) 返回 ()正在搜索 = 真当前页 = 1 总记录数 = 0 线程_创建 (&执行数据库搜索, 搜索关键词 )|
(暂未填写DLL命令名) | | | |
(未填写库文件名) | |
(未填写命令名) | |
关键词 | 文本型 | | |
.局部变量 记录集, 记录集 .局部变量 SQL语句, 文本型 .局部变量 结果数组, 文本型, , "0" .局部变量 i, 整数型 SQL语句 = “SELECT COUNT(*) FROM 表名 WHERE 标题 LIKE '%" + 关键词 + "%'”数据库1. 执行SQL (SQL语句, 记录集 )总记录数 = 记录集. 读整数 (“COUNT(*)”)记录集. 关闭 () SQL语句 = “SELECT ID,标题,时间 FROM 表名 WHERE 标题 LIKE '%" + 关键词 + "%' ” + “LIMIT ” + 到文本 ( (当前页 - 1 ) × 每页条数 ) + “, ” + 到文本 (每页条数 )数据库1. 执行SQL (SQL语句, 记录集 ) 计次循环首 (记录集.记录数量, i ) 加入成员 (结果数组, 记录集. 读文本 (“ID”)) 加入成员 (结果数组, 记录集. 读文本 (“标题”)) 加入成员 (结果数组, 记录集. 读文本 (“时间”))  记录集. 到下一条 () 计次循环尾 ()记录集. 关闭 () 界面_执行 (&更新超级列表框, 结果数组 )正在搜索 = 假 |
(暂未填写DLL命令名) | | | |
(未填写库文件名) | |
(未填写命令名) | |
数据数组 | 文本型 | | |
.局部变量 i, 整数型 .局部变量 表项索引, 整数型 超级列表框1. 开始更新 () 超级列表框1. 全部删除 () 计次循环首 (取数组成员数 (数据数组 ) ÷ 3, i ) 表项索引 = 超级列表框1. 插入表项 () 超级列表框1. 置标题 (表项索引, 0, 数据数组 [ (i - 1 ) × 3 + 1 ]) 超级列表框1. 置标题 (表项索引, 1, 数据数组 [ (i - 1 ) × 3 + 2 ]) 超级列表框1. 置标题 (表项索引, 2, 数据数组 [ (i - 1 ) × 3 + 3 ]) 计次循环尾 () 超级列表框1. 结束更新 () 标签_状态.标题 = “找到 ” + 到文本 (总记录数 ) + “ 条结果,显示第 ” + 到文本 (当前页 ) + “ 页”按钮_上一页.禁止 = (当前页 = 1 )按钮_下一页.禁止 = (当前页 × 每页条数 ≥ 总记录数 ) 如果真 (当前页 > 1 ) 当前页 = 当前页 - 1 执行数据库搜索 (搜索关键词 ) 如果真 (当前页 × 每页条数 < 总记录数 ) 当前页 = 当前页 + 1 执行数据库搜索 (搜索关键词 ) 如果真 (当前页 × 每页条数 < 总记录数 且 正在搜索 = 假) 当前页 = 当前页 + 1 执行数据库搜索 (搜索关键词 ) 时钟_销毁 (搜索计时器 )
|
|