Autoinc 001, 002, 003 URGENTE!!

Question

Preciso do codigo para gerar autoinc do tipo 001, 002, 003 etc.. toda vez que se inserir um novo cadastro, no caso no evento OnNewRecord, mostrando assim, no DBLabel o codigo 001, 002, 003 etc..

Um abra�o

nelson

Galouco · Answer

no evento onnewrecord vc deve recuperar o c�digo guardado na tabela.
Se vc estiver usando o componente table ser� da seguinte maneira:

Table1.Last;

Numero := Table1.FieldByName(�Codigo�).AsFloat + 1;
*lembrando de declarar a variavel Numero como extended.
Table1.Append;
dbEdit.Text := FormatFloat(�000�,Numero);

Acho que assim vai dar certo. Qualquer coisa me diga. pelo email tanure@perfilcs.com.br

F�rum Autoinc 001, 002, 003 URGENTE!! #155162