Hola yebabas.
Si no entiendo mal lo que buscas realizar, tenes que tomar la cadena de a dos caracteres:
Código Delphi
[-]
ShowMessage(IntToStr(StrToInt('$'+'AA'))+#13#10+
IntToStr(StrToInt('$'+'AE'))+#13#10+
...);
Por ejemplo, si tenes el número hexadecimal en una cadena y quisieras pasarlo a otra en formato decimal separado por un espacio:
Código Delphi
[-]
function Hex2dToInt(const Hexa: string): string;
var
i,c: Integer;
begin
c:= 1;
for i:= 1 to Length(Hexa) div 2 do
begin
Result := Result + IntToStr(StrToInt('$' + Copy(Hexa, c, 2))) + ' ';
Inc(c, 2);
end;
SetLength(Result,Length(Result)-1);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Clear;
Memo1.Text := 'AAAE3153';
Memo1.Lines.Add(Hex2dToInt(Memo1.Text));
end;
Saludos.
Edito: Es claro que se debe convenir el uso de dos caracteres para representar un valor numérico hexadecimal.