TInteger.TestBit

Source

Integer.pas (105)