Autoinc 001, 002, 003 URGENTE!!
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
Um abraço
nelson
Njunior
Curtidas 0
Respostas
Galouco
16/04/2003
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
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
GOSTEI 0