Foros Club Delphi - Banda Subdetail en 2 columnas

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)

- - Banda Subdetail en 2 columnas (https://www.clubdelphi.com/foros/showthread.php?t=7206)

Taribus

08-02-2004 11:48:10

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. :o

Os agradeceria vuestra ayuda.

Muchas gracias.

Manuel.

marcoszorrilla

08-02-2004 12:46:46

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.

Taribus

08-02-2004 13:05:52

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,

marcoszorrilla

08-02-2004 13:25:18

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.

Taribus

08-02-2004 14:11:33

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.

La franja horaria es GMT +2. Ahora son las 12:45:14.