Описание
Процедура уменьшает значение переменной X на величину N или на 1, если параметр N опущен (т.е. Dec(X)=X-1, а Dec(X,N)= X-N). Аргумент X должен представлять собой переменную перечислимого типа (включая Int64), или типа PChar (если допускается расширенный синтаксис). Значение необязательного параметра N должно иметь целочисленный тип.
Рекомендуется использовать процедуру Dec в программах, насыщенных циклами, т.к. она генерирует наиболее оптимизированный код.
Пример var
i: Integer;
begin
i:= Height-10;
while i>0 do
begin
Canvas.TextOut(10, i, IntToStr(i));
Dec(i, 20); // i:= i-20 end;
