记得BYTE数组转为STRING要加#0,不知对不对。

解决方案 »

  1.   

    下面程序在Delphi 6编译通过,结果正确
    1. 将字符串转成byte数组
    var
     aa:array of byte;
     str1:string;
     i:integer
    begin
     str1:='something for test';
     setLength(aa,length(str1));
     for i:=1 to length(str1) do
      aa[i]:=byte(str1[i]);
    end;
    2. 据我所知,不可以
    3. 将byte数组转为字符串
    var
     aa:array of byte;
     str1:string;
     i:integer
    begin
     设数组长度,赋值
     for i:=1 to length(aa) do
     begin
      str1[i]:=char(aa[i]);
      setlength(str1,length(aa));
     end;
    end;
    4. 好象strpcopy()是将字符串拷贝到pchar
    5. 会,字符串只会显示#0之前的部分(我试过)
      

  2.   

    谢谢楼上的,
    要是把一个byte数组(b1),转换成string,然后再将string转换成byte数组(b2),
    b2和b1是否相等?