如何计算字符串变量使用的实际内存？

Delphi中的字符串位于动态内存中。

如何计算字符串变量使用的实际内存(以字节为单位)？

我知道字符串必须存储一些附加信息，至少引用计数和长度，但除字符外，它使用了多少个字节？

var
  S: string;

使用Delphi 2010，XE，XE2

解决方法

从官方Embarcadero文档获取的32位UNICODE DELPHI上的布局是这样的：

请注意，64位版本中有一个额外的longint字段用于16字节对齐。 “system.pas”中的StrRec记录如下所示：

StrRec = packed record
{$IF defined(cpuX64)}
  _Padding: LongInt; // Make 16 byte align for payload..
{$IFEND}
  codePage: Word;
  elemSize: Word;
  refCnt: Longint;
  length: Longint;
end;

有效载荷的大小始终为2 *(长度1)。开销为12或16字节，适用于32或64位目标。请注意，实际的存储器块可能大于由存储器管理器确定的所需的存储器块。

最后，这个问题有很多错误信息。在64位目标上，字符串仍然由32位有符号整数索引。