易语言超级列表框项目名与文件名同时修改

2024-11-27 05:06:08

推荐回答（1个）

回答1：

刚写的百度经验：http://jingyan.baidu.com/article/e5c39bf59e648239d7603312.html　

.程序集窗口程序集1

.子程序 _按钮1_被单击

.如果真 (编辑框1.内容＝ “”)

返回 ()

.如果真结束

超级列表框1.插入表项 (超级列表框1.取表项数 () ＋ 1, 编辑框1.内容, , , , )

创建目录 (“D:\” ＋编辑框1.内容)

.子程序 _超级列表框1_右键单击表项

弹出菜单 (菜单, 取鼠标水平位置 (), 取鼠标垂直位置 ())

.子程序 _添加_被选择

编辑框1.获取焦点 ()

.子程序 _超级列表框1_被双击, 逻辑型

.参数横向位置, 整数型

.参数纵向位置, 整数型

.参数功能键状态, 整数型

.局部变量临时变量, 文本型

输入框 (“输入要修改的文件名称：”, , , 临时变量, #输入文本)

文件更名 (“D:\” ＋超级列表框1.取标题 (超级列表框1.现行选中项, 0), “D:\” ＋临时变量)

超级列表框1.置标题 (超级列表框1.现行选中项, 0, 临时变量)