如何把一个字符串转换成BYTE数组啊？

Question

即：
Data:array[1..250] of BYTE;
str: string;str := '123456.789';
如何把这个字符串转换成Data这个BYTE数组啊？

Answer 1

strcopy(@data,pchar(str));或CopyMemory(@data,pchar(str),250);

Answer 2

data:array[1..250]of char;
看错了

Answer 3

CopyMemory(@Data, @str[1], Length(str));

Answer 4

这个好象不行啊，我试了一下发现data里的数字不对啊

Answer 5

最笨又最简单的方法：
type
  ByteArray = array of byte;function StrToByteArray(str: string):ByteArray;
var
  i: integer;
begin
  SetLength(Result, Length(str);
  for i := 1 to Length(str) do
  begin
    Result[i - 1] := Ord(str[i]);
  end;
end;

Answer 6

var
  bytearr:array [0..255] of char;
const
  s='123546374567.23asasc';
begin
  ZeroMemory(@bytearr[0],256);
  move(byte(s[1]),byte(bytearr[0]),length(s));
end;