byte问题

suuare 2003-10-21 11:14:04
var s:byte;
现要求改变S各个位的值
如将S的高字节改为1001 低字节改为0110 不用如下方式:
s=96 该怎么做?
...全文
97 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
hiflower 2003-10-21
  • 打赏
  • 举报
回复
s:=s and $0F or $90;
s:=s and $F0 or $06;
lead001 2003-10-21
  • 打赏
  • 举报
回复
还有shl, shr
lead001 2003-10-21
  • 打赏
  • 举报
回复
12 or S ,12 xor s,12 and s,not s
江山易改 2003-10-21
  • 打赏
  • 举报
回复
S:= 96 ;

S := not S ;

Label1.Caption := Format( '%x',[s]);

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧