Código
Para um contador positivo, ou seja, um incrementador, usa-se:
Inc(variavel, qtde a incrementar, ou seja, somar);
Dec(variável, qtde a decrementar, ou seja, tirar);
Observe que basta chamar a procedure e informar os dois parâmetros a ela, o primeiro sendo uma variável do tipo ordinal e a segunda um nº informando a qtde a somar ou tirar.
Exemplo de contador que soma de dois em dois:
Inc(cont,2);
Exemplo de contador que tira de um em um:
Dec(cont,1);
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009