delphi xe下支持Unicode编码方式

procedure TForm1.btn1Click(Sender: TObject);
var
s : string;
s2: AnsiString;
begin
  s := '你好';
  s2 := s;
  Caption := s2;
end;

 s dump $60 $4F $7D $59 


s2 dump $C4 $E3 $BA $C3 





通过查GBK编码 发现S2的编码格式与GBK是一致的。