Delphi - Consecutivo

Hola a todos...
Señores programadores quisiera saber como hago para colocarle internamente un consecutivo a una aplicacion de facturacion que tengo (El consecutivo es para el numero de Factura)...
gracias de antemano...

Puedes crear un campo autoincremental y cada vez que grabes un registro te aumenta en 1 el ultimo numero, pero yo te aconsejo que crees una tabla con un unico campo "numero" y a cada factura le añades el valor del campo numero+1 y posteriormente actualizas dicho campo con el numero resultante ya que asi tienes mas control sobre la numeracion pues en segun que bases de datos no te deja resetear los campos autoincrementales.
Suerte

Tambien puedes captar el ultimo valor en el evento BeforeInsert y incrementarlo de uno en el evento OnNewRecord..

Prueba esto, yo lo uso para cuando le pido el ultimo folio de Facturas
Select Max(FOLIO)+1 from tfac_facturas
where bodega=:bodega and
tipomov=:TIPOMOV
into:xFolio;