Question

易语言超级列表框怎么添加快捷方式跟读取路径？

具体的问题是这样的。在超级列表框里面。添加一个拖放控件。让后当有文件拖放到里面的时候读取文件图标、名字、跟路径，已方便运行！（主要是快捷方式图标）。也就算是个可以支持拖放的游戏菜单。如果看不懂得可以加我 QQ：67910105。最后还是那句老话，不是这方面的别废话，你有游戏菜单源码的，里面没说这段的也别废话！求高手！转载的闪。谢谢！

Answer 1

用到的控件:超级列表框,拖放对象 .版本 2 .支持库 edroptarget .支持库 iext .支持库 iext2 .支持库 shell .程序集 窗口程序集1 .程序集变量 完全文件路径, 文本型, , "0" .子程序 __启动窗口_创建完毕 拖放对象1.注册拖放控件 (取窗口句柄 ()) 拖放对象1.接收文件 ＝真 .子程序 _拖放对象1_得到文件 .参数 接收到的文件路径, 文本型 .局部变量 文件名, 文本型 文件名 ＝ 取文本右边 (接收到的文件路径, 取文本长度 (接收到的文件路径) － 倒找文本 (接收到的文件路径, “\”, , 假)) 加入成员 (完全文件路径, 接收到的文件路径) 获取快捷方式 (超级列表框1, 文件名, 接收到的文件路径) .子程序 获取快捷方式 .参数 指定列表框, 超级列表框 .参数 文件名, 文本型 .参数 接受文件路径, 文本型 .局部变量 图片组, 字节集 .局部变量 图片号, 整数型 图片组 ＝ 指定列表框.图片组 指定列表框.可视 ＝假 图片号 ＝ 提取加入图片 (图片组, 接受文件路径, , ) 指定列表框.图片组 ＝ 图片组 .如果 (图片号 ≠ -1) 指定列表框.插入表项 (-1, 文件名, 图片号, , , 取数组成员数 (完全文件路径)) .否则 指定列表框.插入表项 (-1, 文件名, 0, , , 取数组成员数 (完全文件路径)) .如果结束 指定列表框.可视 ＝真 .子程序 _超级列表框1_表项被激活 执行(, 完全文件路径 [超级列表框1.取表项数值 (超级列表框1.现行选中项)], , , )