Imprimir ultima pagina en quickreport

[Joelramos]

Tengo una tabla donde llenar 7 veces equivale a 7 paginas, mi pregunta es, cada que lleno por defecto que se ubique la impresion en la ultima pagina y solo se imprima esta ultima.
El codigo que estoy usando hasta ahora es:
procedure TForm1.ImprimirLClick(Sender: TObject);
begin
Form2.QuickRep1.Preview;
end;
osea estoy haciendo manualmente la ubicacion de la ultima hoja por medio de printersetup (escogo la ultima pagina), quiero evitar ese proceso manual, gracias.

[[eduarcol]]

filtra la consulta para que solo muestre el ultimo registro ingresado, si no das mas detalle sobre la conexion no podemos ayudarte

[Joelramos]

La DB se llama "licencias" usando para la conexion DBE, la tabla se encuentra en un modulo Data Module de nombre "modulo", nombre de ese formulario: "DataM", nombre de la tabla "table1".

Los reportes son quickreport1 y quickreport2 dentro de un page control, estan dentro de un formulario de nombre Form2.

[[eduarcol]]

Tienes alguna clave en el registro?? como podriamos recuperar la clave del ultimo registro?? lee la guia de estilo para que sepas como formular la pregunta

[marcoszorrilla]

Código Delphi [-]
DmConta.QrBancos.DisableControls;
  try
  Application.CreateForm(TfrlstBancosl, frlstBancosl);  
  frlstbancosl.ListaBancos.Prepare;

  nPages:= frlstbancosl.ListaBancos.qrprinter.PageCount;

  frlstbancosl.ListaBancos.Printersettings.firstpage:=nPages;
  frlstbancosl.ListaBancos.Printersettings.lastpage:=nPages;

  frlstbancosl.Listabancos.PreviewModal;

Aquí tienes un ejemplo. En síntesis, lanzas un Prepare y sabes cuantas páginas va a tener el listado y luego haciendo que la primer y última página sean igual al número de éstas, solamente te imprimirá la última.

Yo utilizo un diálogo en los listados para que el usuario diga desde que página hasta que otra desea.

Un Saludo.

[Joelramos]

Tabla Datos.db
Data base: licencias
DBE: Manejador de tablas de nombre: Table1
estructura de la tabla:
Serie Type A Size 6 (key)
Reg A 6
Apellido A 25
nombre A 25
importe N
fecha D
Table1 este dentro de un DataModule (nombre: DataM)
Reporte en Form2 (quickreport1)
Un saludo

[[eduarcol]]

Probastes la solucion de marcos??'

Si lo quieres hacer con filtro seria,

Table1.Setrange([UltimoSerie],[UltimoSerie]);

donde UltimoSerie es una variable que captura la ultima clave ingresada al sistema.

no se si me explico bien