Foros Club Delphi - No me funciona el printer setup del quireport

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)

- - No me funciona el printer setup del quireport (https://www.clubdelphi.com/foros/showthread.php?t=62672)

ingabraham

07-01-2009 19:24:33

No me funciona el printer setup del quireport

Hola tengo un Qreport Normal.

Al momento de mostrar los datos en el
quisiera imprimir solo algunas hojas

al momento de presionar el printer setup . para escojer la impresion de 1 o 2 hojas, le doy aceptar y no me funciona , no imprime nada

que puedo hacer para que me funcione

gracias,

luisgutierrezb

07-01-2009 22:21:45

escoges las hojas, le das aceptar y luego en el icono imprimir, te tomara la configuracion que le hayas puesto en setup

marcoszorrilla

07-01-2009 22:26:51

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.

ingabraham

07-01-2009 22:27:27

Cita:

Empezado por luisgutierrezb (Mensaje 333722)

escoges las hojas, le das aceptar y luego en el icono imprimir, te tomara la configuracion que le hayas puesto en setup

Muchas Gracias compañero.
yo pensaba q tenia q imprimir de una vez,gracias.

ingabraham

07-01-2009 22:31:30

Cita:

Empezado por marcoszorrilla (Mensaje 333725)

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.

pero esos button aparece en el qreport?

marcoszorrilla

07-01-2009 22:39:20

No se trata de presentar un formulario Modal con esos botones que comento en donde el usuario dice desde que página a que página desea imprimir, curiosamente en la vista previa muestra todo, pero al imprimir imprime solamente las páginas seleccionadas.

Un Saludo.

La franja horaria es GMT +2. Ahora son las 01:13:29.