在delphi里怎么将string类型的数据转换为array of Byte[ ]类型的数据?

解决方案 »

  1.   

    a: array [1..255] of byte;
    s: stringfor i:= 1 to Length(s) do a[i] := Ord(s[i]);http://lysoft.7u7.net
      

  2.   

    可以强制类型转换的.type
      ArrayByte=array[0..255] of byte;
      PArrayByte=^ArrayByte;procedure TForm1.Button1Click(Sender: TObject);
    var
      s:string;
      p:PArrayByte;
    begin
      s:='123456abc';
      p:=PArrayByte(s);
      showMessage(IntToStr(p^[0]));
    end;
      

  3.   

    a: array [1..255] of byte;
    s: string;move(s[1],a,length(s));
      

  4.   

    a: array [1..255] of byte;
    s: string;move(s[1],a,length(s));类似C的写法哦!