易语言怎么提取文件路径到编辑框2

易语言怎么提取文件路径到编辑框2,第1张

版本 2

子程序 _按钮1_被单击

局部变量 文件名, 文本型

局部变量 子目录数组, 文本型, , "0"

局部变量 子目录名, 文本型

局部变量 i, 整数型

文件名 = 寻找文件 (编辑框1内容 + “\”, )

编辑框2内容 = “”

判断循环首 (文件名 ≠ “”)

  编辑框2内容 = 编辑框2内容 + 编辑框1内容 + “\” + 文件名 + #换行符

  文件名 = 寻找文件 (, )

判断循环尾 ()

子目录名 = 寻找文件 (编辑框1内容 + “\”, #子目录)

清除数组 (子目录数组)

判断循环首 (子目录名 ≠ “”)

  如果真 (取文本左边 (子目录名, 1) ≠ “”)

      加入成员 (子目录数组, 编辑框1内容 + “\” + 子目录名)

  如果真结束

  子目录名 = 寻找文件 (, #子目录)

判断循环尾 ()

计次循环首 (取数组成员数 (子目录数组), i)

  文件名 = 寻找文件 (子目录数组 [i] + “\”, )

  判断循环首 (文件名 ≠ “”)

      编辑框2内容 = 编辑框2内容 + 子目录数组 [i] + “\” + 文件名 + #换行符

      文件名 = 寻找文件 (, )

  判断循环尾 ()

计次循环尾 ()

可以自己通过计算出来,得到文件路径后减去文件名就可以了 版本 2

支持库 edroptarget程序集 窗口程序集1子程序 __启动窗口_创建完毕拖放对象1注册拖放控件 (_启动窗口取窗口句柄 ())

子程序 _拖放对象1_得到文件

参数 接收到的文件路径, 文本型如果真 (取文本右边 (接收到的文件路径, 1) ≠ “\”) ' 判断是文件还是文件夹

接收到的文件路径 = 取文本左边 (接收到的文件路径, 倒找文本 (接收到的文件路径, “\”, , 假))

如果真结束

编辑框1内容 = 接收到的文件路径

版本 2

支持库 shell

程序集 窗口程序集1

子程序 _按钮1_被单击

编辑框1内容 = 到文本 (取特定目录 (11))

' 1: #我的文档; 2: #我的收藏夹; 3: #系统桌面

' 4: #系统字体; 5: #开始菜单组; 6: #程序菜单组

' 7: #启动菜单组; 8: #程序数据目录;

' 9: #Windows安装目录; 10: #Windows系统目录

' 11: #临时文件目录。

看下图:

晕了,我这个图还不够吗? 这个都已经给你取出 11个路径了还不够?你只要换下 括号里面那个 、从1到11都行,各自的路径

版本 2子程序 _拖放对象1_得到文件

参数 接收到的文件路径, 文本型

局部变量 w, 文本型w = 取文本左边 (接收到的文件路径, 倒找文本 (接收到的文件路径, “\”, , 假))

编辑框1内容 = w

首先 鄙视楼上的 答非所问 下面的 说明 很清楚了

10 = #Windows系统目录;

调用格式: 〈文本型〉 取特定目录 (整数型 欲获取目录类型) - *** 作系统界面功能支持库->杂类

英文名称:GetSpecialFolderPath

本命令返回指定的Windows系统特定目录,所返回目录名以“\”符号结束,如失败返回空文本。本命令为初级命令。

参数<1>的名称为“欲获取目录类型”,类型为“整数型(int)”。本参数指定欲获取目录的类型,可以为以下常量值之一: 1: #我的文档; 2: #我的收藏夹; 3: #系统桌面; 4: #系统字体; 5: #开始菜单组; 6: #程序菜单组; 7: #启动菜单组; 8: #程序数据目录; 9: #Windows安装目录; 10: #Windows系统目录; 11: #临时文件目录。

*** 作系统需求: Windows

先添加1个编辑框和一个按钮(此行不用复制)

版本

2

程序集

窗口程序集1

子程序

__启动窗口_创建完毕

子程序

_按钮1_被单击

局部变量

shellf,

对象

局部变量

folderf,

对象

局部变量

folderitemf,

对象

shellf创建

(“shellapplication”,

)

folderf

shellf读对象型属性

(“browseforfolder”,

0,

“请选择目录:”,

0,

“c:\scripts”)

folderitemf

folderf读对象型属性

(“self”,

)

如果

(取文本长度

(folderitemf读文本属性

(“path”,

))

0)

否则

编辑框1内容

folderitemf读文本属性

(“path”,

)

如果真

(取文本右边

(编辑框1内容,

1)

“\”)

编辑框1内容

编辑框1内容

“\”

如果真结束

如果结束

返回

()

问题是你不告诉易语言文件路径怎么取文件路径?这问题有点纠结……

是取自身的运行路径的话很容易,取运行目录(),但是你说取文件路径,哪个文件?你知道是哪个文件了,不就知道路径在哪里了?直接说一个文件名要去路径的话,除非全盘搜索,要不然就是你运行程序的自身目录。。。

以上就是关于易语言怎么提取文件路径到编辑框2全部的内容,包括:易语言怎么提取文件路径到编辑框2、易语言拖拽文件怎么取路径啊……、易语言如何取系统临时文件夹的路径代码等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/9541733.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-29
下一篇 2023-04-29

发表评论

登录后才能评论

评论列表(0条)

保存