Mostrar u Ocultar encabezado del Qreport

[ingabraham]

Empezado por Caral

Hola
Pues me parece muy sencillo, me extraña tanta complicacion.
un QRLabel en el Page Header
y un simple codigo.

Código Delphi [-]
if thoja.Text='CARTA' THEN
QuickRep1.QRLabel1.Caption:= 'Letter'
ELSE
QuickRep1.QRLabel1.Caption:= 'Legal';//OFICIO
end;




Mas facil, nada.
Ojala todas las preguntas fueran asi.
Saludos

En realidad esto no es lo q busco, lo que estas haciendo es asignandole un string a un label.
Yo lo que necesito es asignarle a la propiedad PaperSize el Letter
(carta) o legal(oficio)

[[eduarcol]]

agrega al uses la libreria QRPrntr

la asignacion la debes hacer sin las comillas:

if thoja.Text='CARTA' THEN
QuickRep1.QRLabel1.Caption:= Letter
ELSE
QuickRep1.QRLabel1.Caption:= Legal;//OFICIO
end;

[ingabraham]

Empezado por eduarcol

agrega al uses la libreria QRPrntr

la asignacion la debes hacer sin las comillas:

if thoja.Text='CARTA' THEN
QuickRep1.QRLabel1.Caption:= Letter
ELSE
QuickRep1.QRLabel1.Caption:= Legal;//OFICIO
end;

No no no me has entendido
es asignarselo a esto:

Código Delphi [-]
//tipo Hoja
         if thoja.Text='CARTA' THEN
            Form29.QuickRep1.Page.PaperSize:='Letter'
         ELSE
            Form29.QuickRep1.Page.PaperSize:='Legal';//OFICIO

[[eduarcol]]

obviamente me equivoque al copiar el codigo pero has la prueba de lo que te digo y veras que si funciona.

[ingabraham]

ya hice la prueba con uses la libreria QRPrntr
y nda

[[egostar]]

Empezado por ingabraham

En realidad esto no es lo q busco, lo que estas haciendo es asignandole un string a un label.
Yo lo que necesito es asignarle a la propiedad PaperSize el Letter
(carta) o legal(oficio)

Vamos por partes, este hilo comienza con esta pregunta

Empezado por ingabraham

Mostrar u Ocultar encabezado del Qreport

Como hago por codigo que muestre el encabezado en todas las paginas

Después mezclas otra pregunta en este mismo hilo (que por cierto ya has puesto en otros hilos)

Empezado por ingabraham

He buscas por todos los hilos

esto es imposible de hacer,
alguien me diga
he visitado mas de 20 foros aqui

este codigo no esta bien¿
existe muchos problemas para colocar la impresora con el qreport igual, el tamaño de papel¿
alguien digame

Como pretendes que alguien te conteste bien a dos preguntas diferentes en un mismo hilo.

Salud OS.

[ingabraham]

Listo
caso resuelto:

Para quien le sirva el codigo:

Código Delphi [-]
          if thoja.Text='CARTA' THEN
                 Form29.QuickRep1.PrinterSettings.PaperSize:=Letter
           ELSE
                Form29.QuickRep1.PrinterSettings.PaperSize:=Legal;

Y Declaren estas uses QRPrntr
Gracias a todos los q me colaboraron

[[Caral]]

Hola

Empezado por ingabraham

En realidad esto no es lo q busco, lo que estas haciendo es asignandole un string a un label.
Yo lo que necesito es asignarle a la propiedad PaperSize el Letter
(carta) o legal(oficio)

Segun leí en el titulo (Mostrar u Ocultar encabezado del Qreport)
Segun leí en los post (no es lo que busco, no se ha solucionado)
Me parece que el titulo deberia de ser alusivo a lo que se necesita preguntar, para mi fue la respuesta que di.
En la guia lo pone (pregunta nueva, Hilo nuevo).
Saludos

[ingabraham]

Empezado por Caral

Hola

Segun leí en el titulo (Mostrar u Ocultar encabezado del Qreport)
Segun leí en los post (no es lo que busco, no se ha solucionado)
Me parece que el titulo deberia de ser alusivo a lo que se necesita preguntar, para mi fue la respuesta que di.
En la guia lo pone (pregunta nueva, Hilo nuevo).
Saludos

Ok reconosco q fue un error
mezcle dos temas 1. encabezado del qreport y el 2. tamaño papel report
lo hice por q su estructuta y errores eran semejantes y no quise abrir dos hilos, te agradezo mucho por q me ayudastes con la uses q no la tenia.
gracias,