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