[next] [prev] [prev-tail] [tail] [up]

#### Fillword

Declaration:
  Procedure Fillword (Var X;Count : Longint;Value : Word);;
Description:
  Fillword fills the memory starting at X with Count words with value equal to Value. A word is 2 bytes in size.
Errors:
  No checking on the size of X is done.
See also:
  Fillchar (499), Move (536)

Listing: refex/ex76.pp

Program Example76;
{ Program to demonstrate the FillWord function. }
Var W : Array[1..100] of Word;
begin
{ Quick initialization of array W }
FillWord(W,100,0);
end.

[next] [prev] [prev-tail] [front] [up]