Funktionsweise von SetLength

[stb2050]

In der Tat, an einem anderen PC wird etwas anderes, als 2 NUL C zurückgegeben.

Das Ergebnis von WriteLn(length(test)) ist übrigens 0.

Ich versuche mal, den Zusammenhang zu erläutern. Ich versuche, die Delphi-Verschlüssung von http://www.swissdelphicenter.ch/de/showcode.php?id=1243 in PHP zu übersetzen. Das hat an fast allen Stellen schon geklappt, doch an folgender Stelle hänge ich:

Code:

I := Map[S[1]] + (Map[S[2]] shl 6) + (Map[S[3]] shl 12) + (Map[S[4]] shl 18);
writeln(I);
SetLength(Result, 3);
writeln(Result);
Move(I, Result[1], Length(Result));
writeln(Result);

Die Ausgabe ist (beim ersten Durchlauf)
9491535
2NULC
OÔ�

Beim zweiten Durchlauf:
4414743
oNULw
ETB]C

Wie kann man das erklären? An anderen PCs sind Zeilen 1 und 3 der Ausgabe gleich, nur Zeile 2 unterscheidet sich.

Liebe Grüße,
Steffen