Warum sieht Delphi einen dyn. Array of Char nicht als Zeichenkette an?

[Popov]

Also das erste Beispiel mit statischem Array of Char klappt. Ich kann es im Grunde hier und da fast wie ein String nutzen. Warum sperrt sich Delphi aber bei einem dynamischen Array of Char?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
type
  Tx = array[0..3] of Char;
var
  i: Integer;
  x: Tx;
begin
  for i := Low(x) to High(x) do
    x[i] := Chr(65 + i);

  ShowMessage(x);
end;

procedure TForm1.Button2Click(Sender: TObject);
type
  Tx = array of Char;
var
  i: Integer;
  x: Tx;
begin
  SetLength(x, 4);
  for i := Low(x) to High(x) do
    x[i] := Chr(65 + i);

  ShowMessage(x); //geht nicht
end;