FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como elegir una impresora para lanzar un Report?
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
Como elegir una impresora para lanzar un Report?
Posted: Wed Dec 06, 2006 09:12 AM

Como puede forzarse a un REPORT a que permita elegir impresora?. Algo similar a la orden PRINT ... FROM USER Gracias
Rafael

Posts: 189
Joined: Wed Apr 05, 2006 09:48 PM
Como elegir una impresora para lanzar un Report?
Posted: Wed Dec 06, 2006 10:42 AM

Rafael,

PRINT oPrn NAME " Clientes " PREVIEW TO cPrinter

      REPORT oReport TITLE  " " , " "," ", " ", " ", " " ,"  Clientes  " , " ", " " ;
      CAPTION " Clientes " ;
      HEADER "Fecha: "+dtoc(date()),;
             "Hora:  "+time() RIGHT;
      FOOTER " "," ","Página: "+str(oReport:nPage,3) ;
      FONT oFont1, oFont2,oFont3, oFont4 ;
      PREVIEW  ;
      TO DEVICE  oPrn
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
Como elegir una impresora para lanzar un Report?
Posted: Wed Dec 06, 2006 12:35 PM
Pues debo estar haciendo algo mal, porque con:

PRINT  oPrn NAME cTitulo FROM USER PREVIEW
REPORT oReport ;
       TITLE  cTitulo,;
.......
       TO DEVICE oPrn

me deja escoger impresora pero sólo me imprime la primera linea del Report.
Alguna otra sugerencia?,
Gracias,
Rafael
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Como elegir una impresora para lanzar un Report?
Posted: Wed Dec 06, 2006 04:39 PM

Rafael, pues algo rapido seria antes del report meter printersetup(), no se si funcione tambien oReport:Setup()

salu2
paco

____________________

Paco
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
Como elegir una impresora para lanzar un Report?
Posted: Thu Dec 07, 2006 08:27 AM

Paco:

Pues sí señor, funciona. Tan fácil como poner PrinterSetup() antes del REPORT...
A veces las soluciones más obvias son las que más nos cuesta ver. Muchas gracias y un saludo,

Rafael

Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Como elegir una impresora para lanzar un Report?
Posted: Fri Dec 08, 2006 05:44 AM

DND, que bueno que ya se soluciono
salu2
paco

____________________

Paco

Continue the discussion