bArr:array[0..17] of byte=($FB,$00,$12,$02,$01,$00,$00,$00,$00,$00,$00,$00,$00,$00,$02,$00,$00,$FE);
如何将bArr转为Pchar类型

解决方案 »

  1.   

    定义全局变量:
    var
      s: string;
      p: PChar;
    begin
      SetLength(s, 18);
      Move(bArr[0], PChar(s)^, 18);
      Edit1.Text := s;
      p := PChar(s);
      Edit1.Text := P;
    end;
    但由于你的数据是一些非字符的,所以无法显示在Edit中。
    如果你的数据变成是这样:
    bArr:array[0..17] of byte=
        ($45,$57,$58,$59,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57,$57);
    就可以显示了。
      

  2.   

    >>如何将bArr转为Pchar类型可能有问题,到时会被截断了