topic-39786

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

TImprime
Posted: Thu Dec 24, 2020 12:14 PM

Hola.

Necesito imprimir una hoja en formato vertical y la siguiente en formato horizontal, pero no logro hacerlo. Por el momento lo que hago es imprimir la vertical, cierro la previsualizacion y abro la previsualizacion de la horizontal.

Los valores impresos son tomados de un array.

Hay alguna otra manera?

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: TImprime
Posted: Thu Dec 24, 2020 01:54 PM

Intenta:

Code (fw): Select all Collapse

   oPrn:Landscape := .T.

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: TImprime
Posted: Thu Dec 24, 2020 02:02 PM

Algo asi:

Code (fw): Select all Collapse

     IMPRIME INIT "LISTADO"
     
      ::nHoja := 1
     
      PAGE
      ::cabecera()
      ::lineas( )
      ::total_hoja( )
      ENDPAGE
     
      [...]
      ::nHoja := 5

      PAGE

      ::SetLandScape()

      ::cabecera_A( )
      ENDPAGE

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: TImprime
Posted: Thu Dec 24, 2020 02:07 PM

Mira:

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=23638&p=203610&hilit=timprime#p203610

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: TImprime
Posted: Thu Dec 24, 2020 02:08 PM