Gerar indice manualmente......................

:?:

- Uso Delphi 5.0 e Paradox 7.0

- Em uma tabela filha quero gerar o indice manalmente porém da dando o seguinte erro:

[Error] UCadAss.pas(372): Incompatible types: ´TIntegerField´ and ´Integer´

- A sintaxe é a seguinte:

with TbCadAss, TbCadDep do
begin
aux := 0;
if TbCadAssCodigoAss = TbCadDepCodigoAss then
begin
tbcaddep.first;
if tbcaddepcodigodep = nil then
aux := 1;
end
else
aux := aux + 1;
end;
tbcaddepcodigodep := aux; - É AQUI Q DÁ O ERRO
end;

Grato

Jota