delphi 怎么将‘AE FF CD’转换到16进制buffer中

delphi 如何将‘AE FF CD’转换到16进制buffer中
string ：= ‘AEFFCD’；（用string表示的16进制字符）
如何将AEFFCD放到16进制的buffer中呢？

------解决方案--------------------
var
Buf : array [0..n] of Byte;

PWord(@Buf[0])^ := StrToInt('$' + Copy(S , 1 , 4))
Buf[2] := StrToInt('$' + Copy(S , 5 , 2))
或者
Buf[0] := StrToInt('$' + Copy(S , 1 , 2))
Buf[1] := StrToInt('$' + Copy(S , 3 , 2))
Buf[2] := StrToInt('$' + Copy(S , 5 , 2))
如果字符串长也可以用循环.
如果较长,考虑用PInteger/PDWORD一次转8个字符到4个字节中
------解决方案--------------------
还有HexToBin函数！