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

[zxp6220]

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

[ly_liuyang]

a: array [1..255] of byte;
s: string

for i:= 1 to Length(s) do a[i] := Ord(s[i]);

http://lysoft.7u7.net

[zjqyb]

a: array [1..255] of byte;
s: string;

move(s[1],a,length(s));

[welllove88]

a: array [1..255] of byte;
s: string;

move(s[1],a,length(s));

类似C的写法哦！

[QSmile]

用 StrPCopy

[halfdream]

可以强制类型转换的.

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;