RE:Incrementar Numero Factura
debes declarar la variable NumMaximoFact
var
Form1: TForm1;
NumMaximoFact:Integer;
********************************
con esto obtienes el numero maximo de la factura y lo asignas a la variable NumMaximoFact
procedure TForm1.obtienemaxdefactura;
begin
with Query1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT Max(numerofactura) AS numerofactura FROM tablafacturas WHERE numerofactura>=0');
Open;
if(not Eof) then begin
NumMaximoFact := FieldByName('numerofactura).AsInteger;
Next;
end;
end;
end;
*****************
y la variable NumMaximoFact la incrementas en uno donde la necesites, procedure TForm1.obtienemaxdefactura; es un procedimiento que puedes llamar en cualquier otro procedimiento. por cualquier duda, escribeme a mi correo.