易语言拖放文件时怎么取文件图标到图片框
发布网友
发布时间：2023-08-09 19:14
共3个回答
热心网友
时间：2023-08-10 03:02
.支持库 edroptarget
.支持库 iext2
.子程序 __启动窗口_创建完毕
拖放对象1.接收文件 ＝ 真
拖放对象1.注册拖放控件 (编辑框1.取窗口句柄 ())
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
.局部变量 字节集, 字节集
编辑框1.内容 ＝ 取文件名 (接收到的文件路径)
字节集 ＝ 建空图片组 (32, 32)
' 注：加入图片组后的图片会被转为BMP格式！
' 只支持EXE或图标库DLL文件提取图标，如其它格式的可通过取关联获得图标路径和序号，太麻烦了，我就不写了！
.如果真 (提取加入图片 (字节集, 接收到的文件路径, , ) ≠ -1)
图片框1.图片 ＝ 取图片组图片 (字节集, 0, )
.如果真结束
.子程序 取文件名, 文本型
.参数 文件路径, 文本型
.参数 带后缀, 逻辑型, 可空, 可空，默认为真
.局部变量 文件名, 文本型
文件名 ＝ 取文本右边 (文件路径, 取文本长度 (文件路径) － 倒找文本 (文件路径, “\”, , 假))
.如果真 (是否为空 (带后缀) 或 带后缀)
返回 (文件名)
.如果真结束
返回 (取文本左边 (文件名, 倒找文本 (文件名, “.”, , 假) － 1))
热心网友
时间：2023-08-10 03:02
启动时候注册拖放对象
还有拖放对象需要设置接收文件为真
=========代码==============
.版本 2
.支持库 edroptarget
.子程序 __启动窗口_创建完毕
拖放对象1.接收文件 ＝ 真
拖放对象1.注册拖放控件 (编辑框1.取窗口句柄 ())
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
编辑框1.内容 ＝ 接收到的文件路径
‘需要一个拖放对象和一个编辑框组件追问我说的不是这个= =
这个我知道
我问的是 把文件拖进去后 一个编辑框里显示这个文件的名称 不是路径
还有一个就是把文件拖进去后 一个图片框的图片是这个文件的图标
追答不是已经接收到路径了嘛
你用这句代码：
取文本右边（接收到的文件路径，取文本长度（接收到的文件路径） - 倒找文本（接收到的文件路径），“\”，，））
应该是这样的，取出后的文本就是名称了，但这个名称会有后缀。如果不需要你可以在重复上面的操作，不过这次就应该是取文本左边了
取文本左边（接收到的文件路径，倒找文本（接收到的文件路径），“.”，，））
热心网友
时间：2023-08-10 03:03
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ())
.子程序 _拖放对象1_得到文件.参数 接收到的文件路径, 文本型
编辑框1.内容 ＝ 接收到的文件路径
