PChar _nur_ 256 zeichen?

[Win32.API]

Ich habe folgende Funktion :

Delphi-Quellcode:

function meep(pc: PChar; len: Integer): Pchar;
var
  i: integer;
begin
  for i := 1 to len - 1 do
    if (pc[i] = #0) then
      pc[i] := '.';
  result := Pchar(pc + #0);
end;


var
  i : integer;
  pc : Pchar;
begin
  pc := '';
  for i := 1 to 1111 do
    pc := PChar(pc + '#');
  showmessage(inttostr(length(pc)));
  pc := meep(pc,length(pc));
  showmessage(inttostr(length(pc)));
end;

Die erster Meldung gibt mir 256 und die zweite 255 zurueck. Warum sind die beiden Meldungen nicht identisch, in dem fall 1111?