Delphi4 有一个很傻的函数(10分)

M

MicroStar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #1

FileExists的参数用*.* 的时候只在根目录下有用
如用FileExists('c:/txf/*.*')返回 False

 

L

littlegrass

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #2

而且只在C盘根目录下为True。

 

H

huizhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #3

FileExists函数是针对与一个特定的文件的, 只能用来检查某一个文件是否存在,
不能用于检查某一类文件.
按道理来说在根目录下也不应该好用

 

L

littlegrass

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #4

hi, huizhang
FileExists不但可以检查某一个文件的存在，还可以用来检查某一类文
件，如*.zip，或*.z??等的存在。

 

D

dwwang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #5

直接用这段代码就可以了:
var
Handle: THandle;
FindData: TWin32FindData;
begin
Handle := FindFirstFile(PChar(FileName), FindData);
if Handle <> INVALID_HANDLE_VALUE then
//FileExists
end

 

M

MicroStar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #6

Delphi真么会出现这样的问题,
无奈!浪费了我的爱!

 

M

MicroStar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1998-11-10

• #7

接受答案了.