Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 23-04-2006
josejm josejm is offline
Miembro
 
Registrado: abr 2006
Posts: 19
Poder: 0
josejm Va por buen camino
Wink Creación de componentes en ejecución.

Si no supieramos el numero de columnas a imprimir porque la stringgrid es de columnas variables por el usuario tendriamos que crear los TQRLabel en tiempo de ejecución:
Algo así:
este codigo seria en el create o antes del preview o del print del report.
for x:=0 to stringgrid.colcount-1 do begin
qlabeltemp:=tqrlabel.create(detalband);
qlabeltemp.tag:=x; //Asi identificamos a la columna que le corresponde
end;

luego en el oneeddata pondriamos algo asi.
for x:=0 to detailband.componentscount -1
with detailband.components[x] as tqrlabel do begin
caption:=stringgrid.cells[tag,linea];
end;
end;

Bueno espero que este codigo sirva de algo a alguien...
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Impresion de dos StringGrid en Quick Report pkbza Impresión 7 23-11-2006 12:54:45
I/O ERROR 105 +imprimir desde delphi IVAND Impresión 5 02-10-2005 18:51:00
Problema con TQRCompositeReport y StringGrid BlueSteel Impresión 1 30-08-2005 19:09:30
Impresion de datos de un stringgrid Dayvis Impresión 1 24-02-2005 21:31:19
Imprimir composite report desde preview personalizado SnaKe Impresión 5 11-05-2004 09:31:50


La franja horaria es GMT +2. Ahora son las 04:48:08.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi