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?
