Stringlänge setzen, dann füllen

[dizzy]

Auch ohne den theoretischen Hintergrund hätte ich auf einen indizierten Zugriff auf "foo" gewettet.
Es würde schon reichen es so zu machen:

Delphi-Quellcode:

var k: Integer;
    dummy: String; // jaja, ein String... :)
begin
  Setlength(foo, length(ByteArray) * 9);
  i := 0;
  while i < length(ByteArray) - 1 do
  begin
    dummy := IntToHex(ord(ByteArray[i]), 8);
    for k := 0 to 7 do
      foo[i+k] := dummy[k];
    foo[i+8] := ' ';
    inc(i, 9);
  end;
  result := foo;
end;

Braucht halt nur noch ne Schleife, oder aber man könnte was mit Move machen. Das weiss ich aber nicht wirklich
(Ist zu dem ungetestet! Wenn das Quark war, dann seht's mir nach... jaja, das gute Pils)


gruss,
dizzy