Delphi Inc函数和Dec函数的用法

Inc 递增函数 （ increase ）

var
  i:integer
begin
  i := 100;
  inc(i);       // 值 101

  i:=100;
  inc(i,50);     // 值 150
end;

 

Dec递减函数 （decrease） 

var
  i:integer
begin
  i:=100;
  dec(i);   // 值 99
 
  i:=100;
  dec(i,20);  // 值 80    运算 100-20= 80
end;

 

创建时间：2015.06.07       更新日期：2019.12.24

来源：https://www.cnblogs.com/guorongtao/p/4557732.html