Array of Byte in String umwandeln

[meisteralex]

Wie der Titel schon sagt möchte ich gerne ein Array of Byte in einen String umwandeln, weiß jemand wie man das macht ?

[Dax]

Mit einer Schleife, IntToStr und dem "+"-Operator der Strings. Statt IntToStr kannst du auch IntToHex verwenden, wenn die Bytes in Hex-Darstellung angezeigt werden sollen...

[Der_Unwissende]

Zitat von meisteralex:

Wie der Titel schon sagt möchte ich gerne ein Array of Byte in einen String umwandeln, weiß jemand wie man das macht ?

Hi,
ungetestet, aber grob sollte sowas hier klappen (Strings sind auch nur spezielle Arrays of Byte, nicht ganz, aber fast halt):

Delphi-Quellcode:

procedure doFoo(const a: Array of Byte; out s: String);
begin
  setLength(s, length(a));
  
  if length(a) > 0 then
  begin
    move(a[0], s[1], length(a));
  end; 
end;

Gruß Der Unwissende

[Dax]

Das wäre natürlich die andere Interpretationsmöglichkeit und sollte ohne Probleme funktionieren

[Hawkeye219]

Hallo,

eine andere Möglichkeit wäre die Prozedur SetString.

Gruß Hawkeye

[marabu]

Ciao amici.

Delphi-Quellcode:

var
  a: array of Byte;
  i: Integer;
begin
  SetLength(a, 3);
  for i := Low(a) to High(a) do
    a[i] := 65 + i;
  s := String(a);
end;

Cari saluti