Deine Bits und Bytes kannst Du doch wunderbar mit einem Index umsetzen:
Delphi-Quellcode:
Property Bit0OfFirstByte : boolean index 00 ...
Property Bit7OfFirstByte : boolean index 07 ...
Property Bit0OfSecondByte : boolean index 10 ...
Property Bit7OfSecondByte : boolean index 17 ...