如何将array of byte类型的数组转换成字符串?

解决方案 »

  1.   

    a:arry of byte;
    b:widestring;move(a,b);
      

  2.   

    a:arry of byte;
    b:string;b := a;
    SetLength(b,StrLen(PChar(b)));
      

  3.   

    我一直用这个方法的,因为我不知道有move这个东西,呵呵
      

  4.   

    a:array of byte;
    b:string;
    i:integer;
    for i:=1 to length() do
    b:= b+a[i];看可以吧
      

  5.   


    procedure TMainForm.DumpBuf(var pData: array of Byte; len: Integer);
    var
      i: Integer;
    begin
      for i := 0 to len - 1 do
      begin
        PrintStr(' ' + CHR(pData[i]));
      end;
      PrintStrLn('');
    end;