tprinter

[MOISES]

Antonio,

De igual forma que en la clase TReport mientras se genera la previsualización sale un mensaje indicando el número de página que está preparando, sería bueno hacer lo mismo en la clase tprinter.

Muchas gracias por tu atención. Un saludo,

Moisés

[MOISES]

¿Lo podrías incluir en FW.7.12, por favor?. Muchas gracias!!!.

[Marcelo Via Giglio]

MOISES,

prueba esta modificacion de uno de los ejemplos de fw

Code: Select all  Expand view

#include "FiveWin.ch"

static oWnd

function Main()

   DEFINE WINDOW oWnd TITLE "Testing Class TPreview" MDI ;
      MENU BuildMenu()

   DEFINE STATUSBAR OF oWnd PROMPT "FWH Multiple previews management"

   ACTIVATE WINDOW oWnd MAXIMIZED

return nil

function BuildMenu()

   local oMenu
   
   MENU oMenu
      MENUITEM "Build a Preview"
      MENU
         MENUITEM "First" ACTION Preview1()
         SEPARATOR
         MENUITEM "&Exit" ACTION oWnd:End()
      ENDMENU
     
      oMenu:AddMdi()
     
      MENUITEM "&Help"
   ENDMENU
   
return oMenu     

function Preview1()

   local oPrn, odlg, osay, npagina := 1, i

   DEFINE DIALOG oDlg FROM 100,100 TO 200,300 PIXEL
   @ 10,10 SAY oSay VAR STR(npagina) OF oDlg PIXEL
   ACTIVATE DIALOG oDlg CENTER NOWAIT
   
   PRINTER oPrn PREVIEW

      FOR i := 1 TO 30
      PAGE
         oPrn:ImportWMF( "invoice.emf" )
      ENDPAGE
      oSay:refresh()
      npagina++
      NEXT
   
   oDlg:end()

   ENDPRINT
   
return nil     

[/quote][/code]

[MOISES]

Hola, ¡¡Muchas gracias!!.

Pues sí, se trata más o menos de eso.

Antonio, por favor, ¿puedes modificar la clase para que se comporte igual que TREPORT, sacando el mismo diálogo que está en prev32.dll/preview.dll?.

Muchas gracias.


PD: Lo chulo sería que TREPORT y TPRINTER sacaran una Progessbar, eso sería de 10.

[Antonio Linares]

Moisés,

Ese es un cambio que habría que consultar primero con los usuarios, pues afectaría a la "estética" de la aplicación y no todo el mundo puede estar de acuerdo

[Marcelo Via Giglio]

Antonio,

podria ser opcional a traves de un atributo (DATA) de la clase, que por defecto no esta activo, solo ideas

saludos

Marcelo

[MOISES]

Eso es. Un parámetro adicional para especificarlo a voluntad!!.

En todo caso, lo del diálogo en TPRINTER como en que hay en Report no creo que le importe a nadie.