如何用程序统计文本文件的字节数啊

怎么用程序统计文本文件的字节数啊？
怎么用程序统计文本文件的字节数啊？

[解决办法]
这是方法中的一种：

type
TRB = record
B : Char;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
F : file of TRB;
begin
AssignFile(F, 'c:\test.txt ');
Reset(F);
showmessage( '长度： '+ IntToStr(FileSize(F)));
CloseFile(F);
end;

注意，回车换行符是两个字符(#13#10)，也计算在内的。