Bitfields are tricky in Delphi