FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Crear las columnas en Runtime (QReport)
Primero lo primero: Felices Fiestas.
Ya entrando en materia: necesito crear en runtime las columnas de un reporte qReport (QRDBText) y sus titulos asociados (QRDBLabel) en tiempo de ejecución. (Cada uno está en su QRBand respectivo). La intención es poder imprimir una BDD (Paradox) que se muestra en un DBGrid, el usuario puede escojer entre las diferentes BDD del sistema para consultarlas y la intención es crear un reporte generico que incluya todos (o algunos) de los campos de la BDD consultada para generar el reporte. Lo que necesito es un ciclo mas o menos: For i := 0 to DBGrid.Colums.count-1 do c := tQRDBText.Create(Self); c.Top,Left,Width... // Asignar posicion y tamaño c.DataSet, FieldName... // Asignar Tabla y campo Como asigno el nuevo objeto al Band? ¿AddPrintable? c.free???? // se debe liberar antes de crear el otro? End; Creo que es más o menos lo que se debe hacer pero en las pruebas que he realizado no logro asignar el objeto a la banda del reporte correspondiente. Gracias por su ayuda.
__________________
Sitrico |
|
|
|