delphi 如何得到记录类型的长度