再说Delphi的String类型

delphi中string类型是个四不像的冬冬，以前有过无数的文章写它的实质，
今天看aimingoo的书关于string类型和pe数据段的那些章节，有点感触就写了些代码测试，深感作者功底之深
此外还有一点收获
 var
 a1:string='1';
  a2:string='2';
。。。。。。。。。。。。。
a1:=a2;
a2:=a1;
全局变量这样之后才真正让引用计数＝2
聪明的你肯定知道为什么了^_^