Sign in Join
FPDoc Onlineexperiment

FillDWord procedure

In unit System

Fill memory region with 32-bit pattern.

Declaration

pascal
procedure FillDWord(var x; count: SizeInt; value: DWord)

Description

Fillword fills the memory starting at X with Count DWords with value equal to Value. A DWord is 4 bytes in size.

Errors

No checking on the size of X is done.

See also

Example: ex104

pascal
Program Example104;

{ Program to demonstrate the FillDWord function. }

Const
  ArraySize = 1000;

Var
  S : Array [1..ArraySize] of DWord;
  I : longint;

begin
  FillDWord(S,ArraySize,0);
  For I:=1 to ArraySize do
    If S[i]<>0 then
      Writeln('Position ',i,' not zeroed out');
end.

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.