AUTO-INCREMENTO

Olá pessoal, estou com uma duvida tão boba, mas não consigo sair.
Bem estou trabalhando com o PARADOX, minha table tem os seguintes campos:

Codprod  tipo N
Descricão &61672; tipo A
V.Unitario&61672; tipo $

Minha dúvida é o seguinte na hora que dou o camando ONCLICK no botão NOVO:

TABLE1.INSERT;
TABLE1Codprod.valued := TABLE1Codprod.valued +1;

Ao executar o programa apertando o botão NOVO, ele só fica com o valor 1 no campo codprod, e fica repetindo o mesmo. Já tentei de tudo:

Dbedit1.text := flottostr(table1.fieldbyname(‘codprod’).asFloat + 1);

Também,

Var
I:integer;


Por favor me ajudem!?