Puedes ir a la última factura y sumarle uno:
Código Delphi
[-]MiNumero:=0;
Facturas.Last;
MiNumero:=Minumero+FacturasNumero.Value +1;
O bien guardar el último número en una tabla auxiliar, que puede llamarse por ejemplo contadores, allí guardaríamos el nº, del último albarán, factura, Cliente, pedido......
Un Saludo.