procedure TForm1.Button1Click(Sender: TObject);
var
  a,b:string;
begin
  b:='中华人民共和国';
  a:=b[3];
  ShowMessage(a);
end;取出来的a的值为[  ,为何?