On Tue, Aug 18, 2009 at 5:33 PM, Claudio<listas.arqu...@gmail.com> wrote: > Olá pessoal , preciso de uma ajuda basica. > > Tenho 2 valores (bytes) estão em BCD preciso transforma-los em uma word. > > Ex. byte1=01 byte2=50, tem que ficar assim var=150.
Se você quer engatar um byte do lado do outro "hexadecimalmente": vword := $100 * vb1 + vb2; Tem gente que acha mais elegante fazer assim: vword := vb1 shl 8 + vb2; Se você quer juntá-los "decimalmente", tal qual você apesentou acima: vword := 100 * vb1 + vb2 Joao Morais