Otra alternativa para pasar un string a un arreglo de bytes es usar la funcion
StrLCopy
Código Delphi
[-]var
buffer:TBytes;
source:String;
begin
source:='I am a String';
SetLength(buffer,Length(source));
StrLCopy(pchar(buffer),pchar(source),Length(source));
end.
PD: Esta funcion trabaja tanto con pchar como pwidechar
Saludos...