如何对于一个十六进制数按位取反

[li_1975]

对于一个十六进制数怎么进行按位取反呀，在线等

[SonicX]

不明白你的意思
是不是
123456789ABCDEF
变成
FEDCBA987654321

[li_1975]

不是，类如十六进制数为96E5,取反后就应为691A

[mdejtod]

~ 这个操作是吧?
那就转换为二进制再取反.....用CASE语句先转换成二进制..再将它放到一个数组中,最后按位取反.

[li_1975]

具体怎么做呀，说的详细点吗

[lihuasoft]

不必那么复杂。

用Not运算即可：

var
I, J : word;
begin
I := $96E5;// 比如由16进制字串转来：I := StrToInt('$'+'96E5');
J := Not I;
ShowMessage(Format('%x',[J]));//看一下
end;

[li_1975]

OK，做出来了，还是lihuasoft的对，谢谢lihuasoft了