MakeWord

> [HTML Version](makeword.html)

**Синтаксис**

````
function MakeWord(ALo, AHi: Byte): Word;

````
**Описание**

Объединяет два байта в слово.

**Пример кода**

````
var  
  W: Word;  
  B1, B2: Byte;  
begin  
  B1 := 102;              //         01100110  
  B2 := 153;              // 10011001  
  W := MakeWord(B1, B2);  // 1001100101100110  
end.
````