求助改成通用对话框在线等

1182410163

3344.rar (1.57 KB, 下载次数: 6)

2013-12-17 09:54 上传

点击文件名下载附件 求把这个源码改成用通用对话框浏览就可以了 谢谢了！

呼丰唤雨

[e]
.版本 2
.支持库 iext2
.支持库 iext

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

通用对话框1.初始目录 ＝ 取运行目录 ()
局部图片组 ＝ 建空图片组 (32, 32)
.如果真 (通用对话框1.打开 ())
目录 ＝ 通用对话框1.文件名
文件名 ＝ 寻找文件 (目录 ＋ “*.*”, )
图片号 ＝ 提取加入图片 (局部图片组, 目录, , )
超级列表框1.插入表项 (, 文件名, 图片号, , , )
.如果真结束

超级列表框1.图片组 ＝ 局部图片组

[/e]



不知道你想要的是这种不是,如果不是自己再修改下吧

1182410163

———— 发表于 2013-12-17 10:40
[e]
.版本 2
.支持库 iext2

xiexie谢谢！