[marcoszorrilla]

Mira este ejemplo:

Código Delphi [-]
try
  Application.CreateForm(TfrLstFichas, frLstFichas);
  frlstfichas.ListaFichas.Prepare;
  nPages:=frlstfichas.Listafichas.qrprinter.PageCount;

  //Lanzar diálogo de páginas.
  Application.CreateForm(TfrDlgPaginas, frDlgPaginas);
  frDlgPaginas.ShowModal;

  frlstfichas.ListaFichas.printersettings.firstpage:=frDlgPaginas.SpFirst.value;
  frlstfichas.ListaFichas.printersettings. lastpage:=frDlgPaginas.SpLast.Value;
  frlstfichas.listafichas.Print;

  finally
  Dmxxxxx.Fich.EnableControls;
  end;

En síntesis abro un diálogo con unos "SpinsButtons", para que seleccione desde que página hast que página, desea imprimir y luego le paso esos valores a QuickReport.

Un Saludo.