Hola hondaalberto,
Lo que tienes que hacer es crear una base de datos con dos campos:
Cita:
Base de Datos: Facturas
Campos:
IDFACTURA int IDENTITY(1,1)
SERIE varchar(11)
|
Cuando se incremente un registro el IDFACTURA incrementará en 1.
Para mostrar en pantalla A010010010100000001, lo único que tienes que hacer es con el comando FormatFloat lo juntas todo.
Eje.
Código Delphi
[-]
var
FacturaStr: String;
begin
FacturaStr := FieldByName('SERIE').AsString + FormatFloat('00000000', FieldByName('IDFACTURA').AsInteger);
end;
Espero que te sirva.
Un Saludo