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
¿Lo podrÃas incluir en FW.7.12, por favor?. Muchas gracias!!!.
#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 nilHola, ¡¡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. 
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
Antonio,
podria ser opcional a traves de un atributo (DATA) de la clase, que por defecto no esta activo, solo ideas
saludos
Marcelo
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.
