delphi - 如何使用 Delphi 将字节数组转换为字符串？

Question

我正在用Delphi开发一个项目，我想将字节数组转换成字符串类型。我该怎么办？

示例 C# 代码:

private void ListenerOnDataTransmit(DataTransmitEventArgs e)
{
    transmittedMsg = BitConverter.ToString(e.TransmittedBytes, 0, e.TransmittedBytes.Length);
    try { Invoke(new EventHandler(UpdateTransmittedMessagesListView)); }
    catch { }
}

Answer 1

BitConverter.ToString()方法“将指定字节数组的每个元素的数值转换为其等效的十六进制字符串表示形式。”您可以通过在循环中使用 SysUtils.IntToHex() 函数在 Delphi 7 中手动执行相同的操作，例如:

uses
  ..., SysUtils;

var
  bytes: array of byte;
  s: string;
  i: Integer;
begin
  bytes := ...;
  s := '';
  if bytes <> nil then
  begin
    s := IntToHex(bytes[0], 2);
    for i := 1 to High(bytes) do
      s := s + '-' + IntToHex(bytes[i], 2);
  end;
end;