Impresión de tabla con dibujo de celdas

Impresión de tabla con dibujo de celdas

Postby TOTOVIOTTI » Tue Nov 17, 2020 6:39 pm

Hola gente..
es posible realizar con alguna función de la clase TPrinter una impresión tipo tabla?

Ejemplo, suponemos que vemos el xbrowse de una tabla, quiero mandar a imprimir
esa tabla con el dibujo de las celdas y el contenido... se puede realizar?

Espero se entienda lo que quiero realizar...

Muchas gracias
Roberto
Univ@c I.S.I.
Desarrolladores de Software
http://www.elcolegioencasa.edu.ar
User avatar
TOTOVIOTTI
 
Posts: 421
Joined: Fri Feb 05, 2010 11:30 am
Location: San Francisco - Córdoba - Argentina

Re: Impresión de tabla con dibujo de celdas

Postby cmsoft » Wed Nov 18, 2020 12:18 am

Hola Roberto:
Claro que si, pero el proceso es totalmente manual.
Code: Select all  Expand view  RUN

PRINT oPrn NAME "Formulario" PREVIEW MODAL
           oPrn:SetPortrait()
           oPrn:SetPage(9)
           PAGE    
            @ 1.7,.9 PRINT TO oPrn IMAGE "logo.jpg" SIZE 8, 3 CM     // Imprimir una imagen        
             oPrn:CmBox( 1.5, .5, 5, 20.5 ) // Box
            @ 5.5, 1  PRINT TO oPrn TEXT "Texto:" ; //Imprimir texto
                      SIZE 2.5,1 CM FONT oFont3 ALIGN "R"
            ENDPAGE
ENDPRINT
 
User avatar
cmsoft
 
Posts: 1293
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

Re: Impresión de tabla con dibujo de celdas

Postby TOTOVIOTTI » Thu Nov 19, 2020 12:54 pm

Gracias César!
Ya lo estaba haciendo de esta manera... creí que había alguna otra forma de imprimir una grilla tipo excel sin tener que dibujar
celda por celda...
Muchas gracias!
Roberto
Univ@c I.S.I.
Desarrolladores de Software
http://www.elcolegioencasa.edu.ar
User avatar
TOTOVIOTTI
 
Posts: 421
Joined: Fri Feb 05, 2010 11:30 am
Location: San Francisco - Córdoba - Argentina

Re: Impresión de tabla con dibujo de celdas

Postby cmsoft » Thu Nov 19, 2020 1:20 pm

Roberto:
Si la grilla la tienes en un xBrowse, podrías usar la opcion report
Code: Select all  Expand view  RUN
oBrw:Report("Reporte de Articulos",.T.,.F.)

Tambien eso te puede servir
User avatar
cmsoft
 
Posts: 1293
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 46 guests