[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]