[Resolvido] Update para autonumeração!

[MajorPayneRS 0]

Caros Programadores

 

 

Tenho uma tabela com uns 250 registros, criei nessa tabela um campo código e gostaria de fazer uma query para autonumerar esse campo para que eu não tenha que numerar os registros um a um. Já procurei em varios fóruns e ainda não achei nada que pudesse adaptar. Obrigado pela ajuda!

[Jerfs 1]

Faz assim

 

var
i:integer;
Begin
tabela.First;
i:=1;
while not tabela.eof do
Begin
  tabela.Edit;
  tabela.FieldByName('codigo').asInteger := i;
  tabela.Post;
  tabela.Next;
  i := i+1;
End;
End;

Deve funcionar...

[MajorPayneRS 0]

vlw pela ajuda funcionou sim, Abraços!!!