将字符串“123456789”中所有字节求和,取得最低8位,并转换成字符。
解决方案 »
- 相同格式的EXCEL文件如何合并成一个EXCEL文件?修改完后在分成不同的EXCEL?
- 关于将SQLServer指定表数据导出到XML文将中,如何实现?在先等待
- Rave预览问题——帮帮忙
- 如何让delphi设计的界面连接上ACCESS设计的数据库
- ListView在vsReport模式下如何改变列标题的颜色?
- 显示当前日期问题?
- 帮帮忙
- 选择语句,能不能实现啊,各位高手帮忙了!!
- 请详细说明TStringLists的Objects属性的用法,最好有例子!一定给分!
- Fastreport中如何显示sql2000中的jpg格式图片字段?我已经将格式(btJpg)和字段设好,还是出错,听说要改个地方,不知在哪里?
- dll封装mdi问题,在线等,很急!!!!
- 问个比较基础的问题,谢谢大家!!!
低8位 string s
for I := 1 to 8 do
begin
if (x and $01) =1 then s:= '1' +s else s:='0'+s;
x:= x shr 1;
end;
and 按位与
还有,这个方法最终是返回一个字节长度的字符,那你的方法最终是返回x还是s?
谢谢。
你可以找整数试下..
x:= x and $ff
chr(x and $ff)
chr(x and $ff)
直接得到 低 8位的aic码...
还有不明白的自己改下吧