有问题，快帮一下我！！

var
ByteSend:array[0..0] of Byte;

ByteSend[0]:=StrToInt(Edit1.Text);
Edit1.Text字符串内容是十六进制的，怎样转换可以将Edit1.Text字符串类型转换成字节，而Edit1.Text的内容不变？