delphi自身提供了filesize函式，例如：
var
f: file of byte;
size : longint;
begin
assignfile(f, 'f:/t.exe');
reset(f);
size := filesize(f);
edit1.text := inttostr(size);
closefile(f);
end;
這一種如果判斷的檔案被其它程式使用，則會報錯 i/o error
下面這種方法相對更好一些
也可以使用下面的方法：
function getfilesize(const filename: string): longint;
var searchrec: tsearchrec;
begin
if findfirst(expandfilename(filename), faanyfile, searchrec) = 0 then
result := searchrec.size
else
result := -1;
end;
Delphi 中獲取檔案大小
大概有這些方法可以獲得檔案大小 filesizebyname 需要引用idglobal單元 getfilesize filesize 不能獲得正在使用的檔案大小 fileseek tfilestream.size 下面是使用例子 1.filesizebyname 需要引用idglobal單元 beg...
Delphi中獲取檔案大小
大概有這些方法可以獲得檔案大小 filesizebyname 需要引用idglobal單元 getfilesize filesize 不能獲得正在使用的檔案大小 fileseek tfilestream.size 下面是使用例子 1。filesizebyname 需要引用idglobal單元 beg...
liunx判斷檔案大小
ls l grep wc l 或find company type f wc l 檢視某資料夾下檔案的個數，包括子資料夾裡的。ls lr grep wc l 檢視某資料夾下資料夾的個數，包括子資料夾裡的。ls lr grep d wc l 說明 ls l 長列表輸出該目錄下檔案資訊 注意這裡的檔案，...