R
ranyang
Unregistered / Unconfirmed
GUEST, unregistred user!
我知道可以获取本地文件的大小：
function TForm1.getFileSize(FileName:string):Longint;
var SearchRec: TSearchRec;
begin
if FindFirst(ExpandFileName(FileName), faAnyFile, SearchRec) = 0 then
Result := SearchRec.Size
else
Result := -1;
end;
但是远程的文件大小怎么获取？
比如：http://www.wehlxf.com/wps2005.12794.0.exe 的大小？？
function TForm1.getFileSize(FileName:string):Longint;
var SearchRec: TSearchRec;
begin
if FindFirst(ExpandFileName(FileName), faAnyFile, SearchRec) = 0 then
Result := SearchRec.Size
else
Result := -1;
end;
但是远程的文件大小怎么获取？
比如：http://www.wehlxf.com/wps2005.12794.0.exe 的大小？？
