纯源码打造------寻找目录

五少爷 · 发表于 2015-4-18 11:14:37

本帖最后由五少爷于 2015-4-18 11:21 编辑

用了易语言自身的支持库查找目录，我填写的是‘穿越火线’。查找第一层目录的方法就在这里了，拓展的机会（还有第二层第三层目录的）交给网友们了。新建一个按钮，一个编辑框。最后编辑框内容显示是你的安装穿越火线游戏的盘符......我本人需要制作一个类似的程序，结果百度查找没有一个适合的结果，要么就是毫无效果的例程...所以我自己看看易语言自身的支持库后，写下了这个...如果是你需要的，请点个赞，谢谢！
.版本 2
.支持库 eAPI
.程序集窗口程序集_启动窗口
.子程序目录是否存在, 逻辑型
.参数目录名, 文本型
.局部变量位置, 整数型
.局部变量父目录, 文本型
.局部变量子目录, 文本型
.局部变量找到的目录, 文本型
位置＝倒找文本 (目录名, “\”, , 假)
父目录＝取文本左边 (目录名, 位置)
子目录＝取文本右边 (目录名, 取文本长度 (目录名) －位置)
找到的目录＝寻找文件 (父目录＋ “*.*”, #子目录)
.判断循环首 (找到的目录 ≠ “”)
.如果真 (找到的目录＝子目录)
返回 (真)
.如果真结束
找到的目录＝寻找文件 (, #子目录)
.判断循环尾 ()
返回 (假)

.子程序 _按钮1_被单击
.局部变量 aa, 整数型
.局部变量 bb, 文本型, , "0"
.局部变量 cc, 整数型
.局部变量 dd, 文本型
aa ＝取驱动器数量 (0)
bb ＝取驱动器列表 (0)
.计次循环首 (aa, cc)
dd ＝ bb [cc] ＋ “\穿越火线”
.如果真 (目录是否存在 (dd))
编辑框1.内容＝ dd
.如果真结束
.计次循环尾 ()

遵义静以修身 · 发表于 2019-4-28 02:09:56

看下如何

a000000 · 发表于 2015-5-16 13:21:43

多谢，分享而不要钱，赞一个

编程小孩 · 发表于 2015-4-25 08:07:20

支持一下！

InstallTest · 发表于 2015-4-25 06:51:48

学习

Aovecioumim · 发表于 2015-4-25 05:21:49

发反反复复反复反复反复反复反复反复反复反复反复反复反复反复反复反复反复

五少爷 · 发表于 2015-4-24 14:59:31

思雪° 发表于 2015-4-24 08:59
一般获取游戏的路径都是用读取注册表项.楼主可以尝试一下.

如果是职业软件或商业软件的话，网吧里面是虚拟盘，大部分游戏类都没有注册进本机系统的。所以注册表不是万能的。家庭用户当然用注册表最快了...感谢支持，并提出建议。

wanli6599 · 发表于 2015-4-24 14:04:55

顶顶顶顶顶顶顶顶顶顶

冰岛 · 发表于 2015-4-24 13:51:12

真的假的,不过还是先谢了

思雪° · 发表于 2015-4-24 08:59:29

一般获取游戏的路径都是用读取注册表项.楼主可以尝试一下.

InstallTest · 发表于 2015-4-24 07:02:19

学习易语言编程

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

[易源码分享] 纯源码打造------寻找目录