Conversation

Integer to BCD and back...

Newsgroup: embarcadero.public.delphi.language.delphi.general I receive a 16 bit binary data stream, that I store in an integer, encoded as a BCD number and I use this code to convert it to a decimal value. function BCDToInteger(value:integer):integer;