如何得到文件大小

前几天，想写一个功能 如何得到文件大小
总结方法如下：(好像这个最简单)
var
asize:tfilestream;
a:int64;
begin
asize:=tfilestream.Create('text.text',fmShareDenyNone);
a:=asize.Size;
edit1.text:=inttostr(a);
有人说用api函数也可以，我是没有试成功！哪位兄弟有好方法，说一下，先谢了！