如何读取指定目录下面的所有文件
编号：QA003123
建立日期: 2000年7月5日 最后修改日期：2000年7月16日
所属类别：
xu:
操作系统: win98
编程工具: pb
问题: 如何读取指定目录下面的所有文件？
水平: 刚入门
回答:
我不知您要实现的结果是什么样的？因此就几种情况分别分析：
1、给用户一个界面让其选择他感兴趣的文件（打开或者保存）：
打开：
string docname, named
integer value
value = GetFileOpenName("Select File", &
+ docname, named, "DOC", &
+ "Text Files (*.TXT),*.TXT," &
+ "Doc Files (*.DOC),*.DOC")
IF value = 1 THEN FileOpen(docname)
保存：
string docname, named
integer value
value = GetFileSaveName("Select File", &
docname, named, "DOC", &
"Text Files (*.TXT),*.TXT," + &
" Doc Files (*.DOC), *.DOC")
IF value = 1 THEN ...
2、在程序之中判断一个文件是否存在于指定目录（应用文件的自动保存、打开）：
/*filename:如果是当前目录可以不用完全路径，否则则需要完全路径*/
FileExists ( filename )
3、自己做一个文件管理器，列出指定目录的文件信息：
拿原来的一个例子稍加改动，可能还有一些bug，但基本能够满足你的需要，请下载
treeview_tut.zip，在此不再多说！
吴轶群的意见：
建议: 不知你要实现的功能是否是读取某一目录下的所有文件(包括子目录或不包括子目录)。
PB中不提供此功能直接的实现；如果通过Win32Api调用，则是 FindFirstFile()和FindNextFile()，但此两个函数需要引用一个Win32结构参数，结构中有一个参数是指向结构外的指针，PB中无法直接调用。
我的解决方法是用VC做一个这两个函数的包装器dll,在PB中调用此包装器dll。下载FindItem.exe。
此问题由yyq回答。
| |
|
|
| |
|
|
