Procedure Inc (Var X : Any ordinal type[; Increment : Longint]) ;
Inc increases the value of X with Increment. If Increment isn't specified, then 1 is taken as a default.
A range check can occur, or an overflow error, if you try to increase X over its maximum value.
Program Example32;
{ Program to demonstrate the Inc function. }
Const
C : Cardinal = 1;
L : Longint = 1;
I : Integer = 1;
W : Word = 1;
B : Byte = 1;
SI : ShortInt = 1;
CH : Char = 'A';
begin
Inc (C); { C:=2 }
Inc (L,5); { L:=6 }
Inc (I,-3); { I:=-2 }
Inc (W,3); { W:=4 }
Inc (B,100); { B:=101 }
Inc (SI,-3); { Si:=-2 }
Inc (CH,1); { ch:='B' }
end.