| [Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] | 
Decrease value of variable
Source position: system.fpd line 38
| procedure Dec( | 
| var X: TOrdinal | 
| ); | 
| var X: TOrdinal; | 
| Decrement: TOrdinal | 
| ); | 
Dec decreases the value of X with Decrement. If Decrement isn't specified, then 1 is taken as a default.
A range check can occur, or an underflow error, if an attempt is made to decrease X below its minimum value.
| 
 | Increase value of integer variable | 
Program Example14; { Program to demonstrate the Dec function. } Var I : Integer; L : Longint; W : Word; B : Byte; Si : ShortInt; begin I:=1; L:=2; W:=3; B:=4; Si:=5; Dec (i); { i:=0 } Dec (L,2); { L:=0 } Dec (W,2); { W:=1 } Dec (B,-2); { B:=6 } Dec (Si,0); { Si:=5 } end.