procedure MoveWord(const Source; var Dest; Count: Integer);
An analogue of Move for 16 bit values.
[See Also]: MoveLongword