delphi xe 16进制 2进制 取反

可以使用 Delphi 自带的函数 StrToInt 和 IntToBin，以及位运算符 NOT 来实现 16进制转2进制并取反的功能。示例代码如下：

var
  hexStr: string;
  hexValue, binValue: Integer;
begin
  hexStr := 'F1'; // 待转换的16进制字符串
  hexValue := StrToInt('$' + hexStr); // 将16进制字符串转换为整型
  binValue := NOT IntToBin(hexValue, 8); // 将整型转换为8位2进制数并取反
  ShowMessage(IntToStr(binValue)); // 显示结果，输出：11110000
end;

上述代码中，`$` 符号表示后面的字符串是16进制数，`IntToBin` 函数将整型转换为指定位数的2进制数，并返回的结果是一个整型数，使用 NOT 运算符对其进行取反操作，最终结果也是一个整型数。