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
--
[email protected]
Embarcadero MVP
http://www.overbyte.be
_______________________________________________
Delphi mailing list
[email protected]
http://lists.elists.org/cgi-bin/mailman/listinfo/delphi