whoistop 发表于 2012-10-21 03:55:13

如何让程序在使用fileopendialog后记住打开过的目录[已解决]

本帖最后由 whoistop 于 2012-10-21 16:09 编辑

RT
不要使用配置文件的解决方法，这个已经想到了。

楼上风云 发表于 2012-10-21 09:26:45

回复 1# whoistop

变量赋值不就成了？
$FILE=fileopendialog(...)

veket_linux 发表于 2012-10-21 09:41:06

或许你想像word那样文件菜单里有 最近打开过的文件历史

读写注册表吧.........

user3000 发表于 2012-10-21 13:24:13

问题表述存在疑义: 是程序关闭后下次启动时还能记住还是只是当次记住所有打开过的路径?

user3000 发表于 2012-10-21 13:24:36

本帖最后由 user3000 于 2012-10-21 13:33 编辑

(网络卡,发了两次....我也能有今天?)
如果是前者为什么不用配置文件?反正总得把信息写到硬盘上的.
如果是后者,最好是用个数组.

whoistop 发表于 2012-10-21 13:37:26

回复 2# 楼上风云


    变量赋值不行，因为再次运行时变量会被置空。

whoistop 发表于 2012-10-21 13:40:38

回复 4# user3000


    再解释一下：是这样的，因为需要连续操作多个文件，所以希望打开过上个文件后程序能记住这个目录，这样在浏览文件时程序能自动打开这个文件夹，就不需要从起始目录一步步切换了。不知道这样清不清楚。

whoistop 发表于 2012-10-21 13:42:55

回复 5# user3000


    不用做得下次打开程序，在程序未退出的情况下能做到就好了。用ini文件当然能做到，但是还是希望单文件程序，这样比较绿色。

whoistop 发表于 2012-10-21 16:07:36

已经解决，感谢二楼

user3000 发表于 2012-10-21 16:18:32

回复 9# whoistop


    确实用二楼所说的方法就可以了. 实现如下:

Local $dir = @DesktopDir & '\', $file_name = '新建文本文件'
Local $count = 0
While $count < 5
$var = FileOpenDialog('Selcet a Folder?', $dir, '文本文件 (*.txt)', 1+2+8, $file_name)
If @error Then Exit
$dir = StringRegExpReplace($var, '[^\\]+$', '')
$file_name = StringRegExpReplace($var, '.+\\|\.\w+$', '')
MsgBox(0, '本次选择', '路径: ' & $dir & @CRLF & '文件名: ' & $file_name)
$count += 1
WEnd

好久没敲代码,练习下.
页: [1]
查看完整版本: 如何让程序在使用fileopendialog后记住打开过的目录[已解决]