Si es que buscáis siempre lo difícil.
Lo que tienes que usar es
StrToInt. Por ejemplo:
Código Delphi
[-]
FUNCTION ConvertirValor (ValorHex: STRING): BYTE;
BEGIN
RESULT := BYTE (StrToInt (ValorHex) AND $000000FF);
END;
VAR
Valor: BYTE;
BEGIN
Valor := ConvertirValor ('$A1');
END;
El "AND" sirve para maneter el valor en 8bit y evitar el desbordamiento.