怎么样得到文件的大小（DELPHI）

大概有这些方法可以获得文件大小

FileSizeByName（需要引用IdGlobal单元）

GetFileSize

FileSize（不能获得正在使用的文件大小）

FileSeek

TFileStreamSize

下面是使用例子

1。FileSizeByName（需要引用IdGlobal单元）

begin

if

OpenDialog1Execute

then

begin

ShowMessage(IntToStr(FileSizeByName(OpenDialog1Filename)));

end;

2。GetFileSize

var

FileHandle:integer;

begin

if

OpenDialog1Execute

then

begin

FileHandle

:=

FileOpen(OpenDialog1FileName,

0);

ShowMessage(IntToStr(GetFileSize(FileHandle,

nil)));

FileClose(FileHandle);

end;

3。FileSize（不能获得正在使用的文件大小）

var

f:

file;

begin

if

OpenDialog1Execute

then

begin

AssignFile(f,

OpenDialog1FileName);

Reset(f,

1);

ShowMessage(IntToStr(FileSize(f)));

CloseFile(f);

end;

4。FileSeek

var

FileHandle:integer;

begin

if

OpenDialog1Execute

then

begin

FileHandle

:=

FileOpen(OpenDialog1FileName,

0);

ShowMessage(IntToStr(FileSeek(FileHandle,0,2)));

FileClose(FileHandle);

end;

5。TFileStreamSize

var

FS:

TFileStream;

begin

if

OpenDialog1Execute

then

begin

FS

:=

TFileStreamCreate(OpenDialog1FileName,

fmShareDenyNone);

ShowMessage(IntToStr(FSSize));

FSFree;

end;

另在IdGlobalProtocols中有个FileSizeByName()的函数。

/  解题思路： 以只读方式打开某一文件，然后将文件指针定位在文件结尾的位置，利用ftell函数返回指针的在文件中的相对位置即可。

/

#include "stdioh"

main()

{ FILE fp;   /定义文件指针/

  long cnt;   /定义变量cnt用来存储文件大小数据/

  fp=fopen("c:\\1txt","r");   /此处请填写测试文件的地址，并以只读("r")方式打开文件/

  if( fp==NULL )  /如果打开的文件不存在，则退出/

     { exit(0);

       printf("文件打开失败！");

     }

  fseek(fp,0L,SEEK_END);   /利用fseek函数将指针定位在文件结尾的位置/

  cnt=ftell(fp);   /利用ftell函数返回指针相对于文件开头的位置，以字节计算/

  printf("文件所占的字节数为%ld个\n",cnt);   /进行输出/

}

以JAVA为例：

try{ 

      Systemoutprintln("正在链接URL"); 

      url=new URL("网络文件地址"); 

      >

DOS下，查看文件夹的大小，使用DIR命令即可。其具体方法如下：

假设要查看D：\abc目录的大小，可以执行以下命令：

cd D：\abc （此命令意为进入D：\abc目录）

dir /a/s （此命令意为显示D：\abc目录下所有的文件）

Dim TStr, Fstr As String

TStr = InputBox("请输入文件或文件夹的路径：", "提示", "C:\") '

ChDrive Left(TStr, 1)

ChDir Left(TStr, InStrRev(TStr, "\") - 1)

Fstr = Dir(TStr)

If Len(Fstr) Then

Range("B1")Select

ActiveCellFormulaR1C1 = "找到该文件" & FileLen(Fstr) '加多如果找到改文件就在,Range("D1")Select输出文件的大小

Else

Range("C1")Select

ActiveCellFormulaR1C1 = "文件不存在"

End If

返回的是多少字节

你好，这边有一个示例代码，希望对你有所帮助。示例中的urlString，你可以下载之后看看是否跟打印信息大小一致。我这边是一致的。

p：所导入的包都是javanet下面的。

main方法中 直接调用这个函数即可。

static  int getNetWorkFile( ){

   String  urlString=">

以上就是关于怎么样得到文件的大小（DELPHI）全部的内容，包括:怎么样得到文件的大小（DELPHI）、如何用C语言获取文件的大小、如何准确的获取网络文件的大小等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！