Ver Mensaje Individual
  #2  
Antiguo 17-02-2011
Avatar de olbeup
olbeup olbeup is offline
Miembro
 
Registrado: jul 2005
Ubicación: Santiago de la Ribera (España)
Posts: 685
Reputación: 19
olbeup Va camino a la fama
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
Responder Con Cita