Delphi - Reporte

 
Vista:

Reporte

Publicado por Yaneth (1 intervención) el 23/04/2004 02:13:18
Hola a todos los foristas...

Sres. resulta que pienso generar facturas, Que hago para llevar el consecutivo (001-002-003...),en el reporte (QReport)

Gracias...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Reporte

Publicado por Elena (330 intervenciones) el 23/04/2004 15:21:10
Debes tener un campo auto incremento, creado por ti mismo, para obtener los ceros delante el campo debe ser string, haces esto
select max(codigo) +1 as Incremento from LaTabla

Para insertar haces esto en el onnewrecord de la tabla
Query.Close;
Query.Open;
Tabla['NoFactura'] := '00'+IntToStr(Query['Incremento']);

Espero que te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar