今天给大家分享的是由图老师小编精心为您推荐的Delphi中取某整数的某位的位状态的小函数,喜欢的朋友可以分享一下,也算是给小编一份支持,大家都不容易啊!
【 tulaoshi.com - 编程语言 】
type
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)TPosRange=0..32;
TStateResult=0..1;
function GetBitSate(Source:Integer;Pos:TPosRange):TStateResult;
begin
Result:=((Source and (1 shl Pos))shr Pos);
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)end;
来源:http://www.tulaoshi.com/n/20160219/1601931.html
看过《Delphi中取某整数的某位的位状态的小函数》的人还看了以下文章 更多>>