我写得有点复杂，不过对你有益：

var
  C : WideChar;
begin
  C := WideString(Chr($B0) + Chr($A1))[1];
  Showmessage(C);
end;

你需要的应该是类型转换函数，即如何将 "十六进制码的字串:AABB  转换为 INT 数据类型"。可考虑使用：函数 StrToInt 或 过程 Val

function StrToInt(const S: string): Integer;
procedure Val(S; var V; var Code: Integer);

例子如下，设 num 是返回的整数变量, 
1)    num := StrToInt('0xaabb');
2)    Val('0xaabb',num,rcode); 

rcode=0 表示 Val() 转换成功。