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

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 08-02-2004
Taribus Taribus is offline
Miembro
 
Registrado: may 2003
Ubicación: Madrid
Posts: 28
Poder: 0
Taribus Va por buen camino
Banda Subdetail en 2 columnas

Buenos dias a todos.

Pues eso, tengo un informe en el que se presenta una hoja de trabajo para los tecnicos de máquinas, y contiene una banda subdetail, en la que figuran unas determinadas piezas y cuando y quien las ha cambiado, en total un máximo de 6 piezas, es decir 6 lineas en el Subdetail.

¿es posible que en vez de salir las 6 lineas una detras de otra, en una sola columna, puedan salir en 2 o más columnas?.

Trabajo con D5 y QuickReport.

Os agradeceria vuestra ayuda.

Muchas gracias.

Manuel.
Responder Con Cita
  #2  
Antiguo 08-02-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Definiendo conlumnas no creo que te sirva, porque se salta a la siguiente columna cuando se llena la primera, y las columnas existen en tiempo de diseño, entonces si solamente hay 2 ó 3 líneas, tendrás 2 columnas y solamente datos en la primera, lo cual estéticamente no quedaría bien.

Sin concer mucho cual pueda ser la distribución de los datos, quizás el enfoque pueda ser crear la distribución mediante código, por ejemplo en el evento BeforePrint conociendo el número de registros juegas con las posiciones Top y Left de los QrDbText y podrás hacer lo que quieras, con más trabajo claro.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 08-02-2004
Taribus Taribus is offline
Miembro
 
Registrado: may 2003
Ubicación: Madrid
Posts: 28
Poder: 0
Taribus Va por buen camino
Gracias Marcoszorilla por contestar (en domingo).

en la banda subdetaill existen 3 qrdbtext : fecha, pieza y tecnico y queda de la siguiente forma:

qrdbtext1=fecha qrdbtext2=pieza qrdbtext3=tecnico

15/10/2001 CLE TECNICO
01/01/2004 KIT TECNICO
01/01/2004 OIL TECNICO
01/01/2004 RDI TECNICO
01/01/2004 RDS TECNICO
01/01/2004 TAM TECNICO
(bueno mas o menos)

y lo que quiero conseguir (si es que se puede) seria :


01/01/2004 CLE TECNICO 01/01/2004 RDI TECNICO
01/01/2004 KIT TECNICO 01/01/2004 RDS TECNICO
01/01/2004 OIL TECNICO 01/01/2004 TAM TECNICO

si utilizo beforeprint ¿como lo hago para saber que qrbtext tengo que desplazar ?.
¿una solucion seria saber de antemano cuantos registros de piezas se van a listar?.

Gracias de antemano.

Un saludo,
Responder Con Cita
  #4  
Antiguo 08-02-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
A la tarde le echaré otra ojeada, pero veo un inconviente inicia, como sabemos como casan las líneas, es decir si todas están en una Tabla y tenemos fecha pieza y técnico, como sabemos como casan las líneas que se quieren colocar al lado, éxplicate un poco más si puede ser.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #5  
Antiguo 08-02-2004
Taribus Taribus is offline
Miembro
 
Registrado: may 2003
Ubicación: Madrid
Posts: 28
Poder: 0
Taribus Va por buen camino
Talking Ya lo he conseguido

Pues lo dicho ya lo he conseguido (con la ayuda inestimable de Marcoszorrilla), siguiendo con el consejo que me dio, referente al BeforePrint, he realizado lo siguiente

Código:
en el evento BeforePrint de la banda Subdetail , consigo saber el numero de linea que se va a imprimir
numerolinea:=numerolinea+1;
en el evento OnPrint de cada QRDBText y pedendiendo del valor de la linea que se vaya a imprimir, se fijan los valores de LEFT y TOP.
Código:
if numerolinea=1 then
  begin
  QRDBtext.left:=16;
  QRDBtext.top:=1;
  end;
if numerolinea=2 then
  begin
  qrdbtext.left:=300;
  qrdbtext.top:=qrdbtext.top-valor del ancho de la banda subdetail
  end;
Espero que pueda servir a alguien mas.

Gracias por todo Marcoszorilla.

Un saludo.

Última edición por Taribus fecha: 08-02-2004 a las 14:13:52.
Responder Con Cita
Respuesta



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


La franja horaria es GMT +2. Ahora son las 19:07:35.


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