Impresión de tabla con dibujo de celdas

Posts: 470

Joined: Fri Feb 05, 2010 11:30 AM

Impresión de tabla con dibujo de celdas
Posted: Tue Nov 17, 2020 06: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.ar

cmsoft

Posts: 1344

Joined: Wed Nov 16, 2005 09:14 PM

Re: Impresión de tabla con dibujo de celdas
Posted: Wed Nov 18, 2020 12:18 AM

Hola Roberto:
Claro que si, pero el proceso es totalmente manual.

Code (fw): Select all Collapse

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

Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com

TOTOVIOTTI

Posts: 470

Joined: Fri Feb 05, 2010 11:30 AM

Re: Impresión de tabla con dibujo de celdas
Posted: 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.ar

cmsoft

Posts: 1344

Joined: Wed Nov 16, 2005 09:14 PM

Re: Impresión de tabla con dibujo de celdas
Posted: Thu Nov 19, 2020 01:20 PM

Roberto:
Si la grilla la tienes en un xBrowse, podrías usar la opcion report

Code (fw): Select all Collapse

oBrw:Report("Reporte de Articulos",.T.,.F.)

Tambien eso te puede servir

Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com

FiveTech Support Forums

Continue the discussion