FiveTech Software tech support forums

Muy buenas, estoy realizando un listados y agrupado por clientes y me gustaría saber como puedo hacer que en cada cliente apareciera un listado con su cabecera de por ejemplo sus obras, sería mas o menos así:

CODIGO NOMBRE
---------- ----------
00001 PEPE

COD.OBRA TOTAL
------------ --------
000000001 25
000000003 25
000000003 25

y cada uno de los encabezados encuadrado en cajas.

Gracias.

Me gustaria hacer eso con el tprinter o treport, la cuestion es poner cajas para enmarcar los encabezados.

Gracias.

Me gustaria hacer eso con el tprinter o treport, la cuestion es poner cajas para enmarcar los encabezados.

Gracias.

Con la tprinter es facil,,

te adjunto, 2 funciones, para dibujar cajas o lineas

cualquier comentario,

aqui andamos.


function _dibujaCuadro(nLinInicial, nColInicial, nLinFinal, nColFinal, oPrn, oPen)
oPrn:Cmtr2Pix(@nLinInicial, @nColInicial)
oPrn:cmtr2Pix(@nLinFinal, @nColFinal)
oPrn:Box(nLinInicial, nColInicial, nLinFinal, nColFinal, oPen )
return (.T.)

function _dibujaLinea(nRen, nColInicial,nColFinal,oPrn, oPen)
local nRen1,nRen2
default nColInicial := 1
default nColFinal := 20.5
nren1 := oPrn:cmtr2pix(nRen,nColInicial)
nren2 := oPrn:cmtr2pix(nRen,nColFinal)
oPrn:line(nren1[1],nren1[2],nren2[1],nren2[2],oPen)
return (.T.)

http://sysctrl...net/tprinterimg.jpg
[/url]