PDA

Ver la Versión Completa : Un summary y detail con problemas!


DarkBlue
25-04-2012, 06:46:00
Hola que tal compañeros foreros, si les gustan los retos aqui tengo uno para ustedes... esto parce un acertijo se acpetan consejos y nuevas maneras de hacer las cosas pues este reporte ya me tiene mareado :S ni un colega me ha podido ayudar por eso recurro a ustedes sabios de todas partes del mundo a ver que les parece este acertijo.

Problema:
no me imprime un pagefooter o un summary en cierta posicion (hasta el final de la hoja), el problema que todo el reporte debe de imprimirse FORZOSAMENTE EN UNA HOJA tamaño oficio (medidas 215.9 y longitud 350.0) el sumary muchas veces me queda a la mitad del camino o se mueve a la siguiente no respeta el lugar, no se como hacer esto.

https://picasaweb.google.com/103397007374194984807/ProblemasDeDesarollo?authuser=0&authkey=Gv1sRgCMmt2LCRx-yrRw&feat=directlink

Datos:
tengo qrdetail band indicandole que quiero 6 columnas por hoja, lo cual es genial por que nunca entran mas elementos para necesitar una hoja extra, he logrado decirle que el detail lo presente en 8 columnas pero deja demasiado espacio en blanco y esto no es posible pues no les ha gustado para nada, aunque de esto modo el sumary siempre queda en la posicion del fondo.

Ademas cabe mencionar que cuando le digo al quickreport que la banda detail debe de estar en 6 columnas la banda se me reduce como miles de pixeles en la pantalla y ni puedo ver como quedara en el preview tengo que andar adivinando coordenadas



object QRBand3: TQRBand
Left = 19
Top = 240
Width = 110
Height = 25
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
BeforePrint = QRBand3BeforePrint
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ForceNewColumn = False
ForceNewPage = False
LinkBand = QRGroup1
ParentFont = False
Size.Values = (
66.145833333333340000
291.041666666666700000)
BandType = rbDetail
object QRLabel1: TQRLabel
Left = 86
Top = 1
Width = 79
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.041666666666670000
227.541666666666700000
2.645833333333333000
209.020833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel1'
Color = clWhite
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 7
end





este es el footer



object QRBand2: TQRBand
Left = 19
Top = 265
Width = 778
Height = 88
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = True
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ForceNewColumn = False
ForceNewPage = False
LinkBand = QRBand3
ParentFont = False
Size.Values = (
232.833333333333400000
2058.458333333333000000)
BandType = rbPageFooter
object QRRichText1: TQRRichText
Left = 351
Top = -17
Width = 241
Height = 89
Frame.Color = clWhite
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psClear
Size.Values = (
235.479166666666700000
928.687500000000000000
-44.979166666666670000
637.645833333333400000)
Alignment = taCenter
AutoStretch = False
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial'
Font.Style = []
Lines.Strings = (
''
''
'________________________'

' Firma ' +
' ')
end




Gracias de nuevo y si han exprimentado un mejor desarollo con alguna otra herramienta que no sea quickreport porfavor compartan!

Neeruu
27-04-2012, 00:19:44
Hola DarkBlue....

Con respecto al Summary.... No tiene una posición fija, sino que se imprime al final de los datos...
El PageFooter si tiene una posición fija y es al final de la Hoja...

Con respecto al espacio que se reduce, también publique el mismo problema pero nadie supo decirme nada...
Si pongo un QRLabel que ocupe todo el ancho de la hoja y escribo hasta el final, al momento de imprimir sale del margen...
http://www.clubdelphi.com/foros/showthread.php?t=78378


Si quieres ayuda con el reporte, cuenta conmigo...

Saludos Neeruu!!! :)

DarkBlue
27-04-2012, 01:21:49
Por supuesto que necesito de tu ayuda Neeruu, decho la solicito formalmente.

Solo dime por donde empiezo =) . Intente usar el footer band pero no lo imprime deecho le puse al footer band un frame de color y linea muy gruesa para comprobar que no se estaba imprimiendo, como era de esperarse no aparece.

Neeruu
27-04-2012, 15:16:37
DarkBlue..... mirando detenidamente la imagen que pusiste.... veo que en la configuración del reporte tienes desmarcado las opciones:
"Print First Page Header" y "Print Last Page Footer"....

Tampoco esta marcado el summary

Prueba marcándolas.... estoy seguro que ese es el problema....

Cualquier cosa me avisas....

Saluda Atte Neeruu!!!:)

DarkBlue
30-04-2012, 18:06:13
debido a las reglas del foro te diria otra cosa, pero con esto basta eres un GENIO!. BUENO lo voy a probar en una impresora por que parece que ya me respeto en el preview y checa lo que te publique.