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.