Hi !
I wrote an article about an original way of iterating thru all the bits of an integer. The final code looks like this: var OneBit : Boolean; begin for OneBit in TBitIterator.Create(1234) do Write(Ord(OneBit)); end; You can read the article at http://francois-piette.blogspot.be/2013/01/original-method-to-iterate-bits-w ithin.html -- francois.pie...@overbyte.be Embarcadero MVP http://www.overbyte.be _______________________________________________ Delphi mailing list Delphi@elists.org http://lists.elists.org/cgi-bin/mailman/listinfo/delphi