多文件拖放，多个编辑框返回不同路径示例

lookaman · 发表于 2023-2-28 17:30:45

可以添加多个编辑框，想拖几个文件都会返回各文件路径
文件多于编辑框时，只显示与编辑框相同数量的路径
添加编辑框时，后添加组件可以放在上边

tutieshi_640x216_11s (1).gif

2023-2-28 17:28 上传

点击文件名下载附件

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口
变量名	类型	数组	备注
路径总	文本型
路径分	文本型	0
组件句柄	整数型
组件数量	整数型
计次	整数型
编辑框	编辑框
路径数量	整数型

子程序名	返回值类型	公开	备注
__启动窗口_创建完毕

拖放对象1.注册拖放控件 (取窗口句柄 ())

子程序名	返回值类型	公开	备注
_拖放对象1_得到文件			只要你编辑框够多，多少文件都可以返回路径
参数名	类型	参考	可空	数组	备注
接收到的文件路径	文本型

路径总＝接收到的文件路径  ' 接收所有路径文本
路径分＝分割文本 (路径总, #换行符, )  ' 拆分成数组
路径数量＝取数组成员数 (路径分)  ' 取路径的数量
组件句柄＝寻找组件 (_启动窗口, , “编辑框”, , )  ' 在启动窗口里找所有编辑框组件句柄
组件数量＝取找到组件数目 (组件句柄)  ' 取所有编辑框组件的数量

计次循环首 (组件数量, 计次) ' 清空所有编辑框

编辑框＝取所找到组件 (组件句柄, 组件数量－计次) ' 通过句柄依次取回组件

编辑框.内容＝ “”

计次循环尾 ()

如果真 (路径数量＜组件数量) ' 路径数量少于组件数量，组件数量等于路径数量

组件数量＝路径数量

计次循环首 (组件数量, 计次) ' 把路径写到编辑框内容

编辑框＝取所找到组件 (组件句柄, 计次－ 1)

编辑框.内容＝ “”

编辑框.内容＝路径分 [计次]

计次循环尾 ()
清除组件寻找句柄 (组件句柄)

i支持库列表	支持库注释
edroptarget	拖放支持库

pxianwei · 发表于 2023-8-27 21:32:11

楼主辛苦了，谢谢楼主，感谢楼主分享

xiaokui0558 · 发表于 2023-4-11 09:19:21

很厉害支持开源

LanRen101 · 发表于 2023-4-4 22:08:38

开源精神必须支持一下。

shabi001 · 发表于 2023-3-12 10:02:16

本帖最后由 shabi001 于 2023-3-12 10:03 编辑

感谢分享！！！！！！！

lvfajun · 发表于 2023-3-4 11:09:23

感谢分享，很给力

林深不见鹿 · 发表于 2023-3-4 03:23:55

谢谢分享

lqylbh · 发表于 2023-3-2 19:21:22

楼主辛苦了，谢谢楼主，感谢楼主分享

396384183 · 发表于 2023-3-2 14:49:02

楼主辛苦了，谢谢楼主，感谢楼主分享，楼主好人一生平安！！！

singlecolor · 发表于 2023-3-2 09:41:51

		自动登录	找回密码
密码			注册

[易源码分享] 多文件拖放，多个编辑框返回不同路径示例

评分