怎样程序判断一个文件的大小? (5分)

金

金少

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #1

怎样程序判断一个文件的大小?

 

D

dz2050

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #2

filesize

 

Y

yangxiao_jiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #3

function FSize(FileName: string): LongInt;
var
F: File;
begin
AssignFile(F, FileName);
reset(F,1);
Result := FileSize(F);
CloseFile(F);
end;

 

Q

quiben

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #4

function FSize(FileName: string): LongInt;
var
F: File;
begin
AssignFile(F, FileName);
reset(F,1);
Result := FileSize(F);
CloseFile(F);
end;

 

金

金少

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #5

多人接受答案了。