Xailer forum

Hola cambie a la version 8.0 de xailer y ahora no funciona la previsualización de impresiones que funcionaba perfectamente en la versión 7 el código que utilizo es el siguiente que lo copie en su momento de la ayuda. Por lo que pude ver no crea el objeto Printer:PreviewControl por que dice que es NIL igual dejo el error al final del post
Si me pudieran ayudar porque ninguna de las previsualizaciones me funciona y eso me crea un caos con los clientes. Gracias

with object Printer:PreviewControl()

:nZoomIndex := 8

:oParent:Show()

end with


***************************** Registro de errores *****************************

Exe: Y:\Nuevo Sistema\Proyectos2021\Nuevo Alexandra\AlexandraSoft.exe
Version: 1.2.2.1
Build: 1
User name: Duilio
Computer name: DUILIO8
Fecha: 13/06/2022
Hora: 14:01:45
Memoria libre: 2097151
Area actual: 12

------------------------- Información del compilador --------------------------

Versión Xailer: Xailer 8.0.0
Compilador: Harbour 3.2.0dev (r1912031042)
Compilador C/C++: MinGW GNU C 7.3 (32-bit)
Plataforma: Windows 10 10.0

----------------------- Información detallada del error -----------------------

Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: No existe el m‚todo *** El objeto es NIL o no existe ***
Operación: GETNEWID
Argumentos: [ 1] = Tipo: U Valor: NIL
Fichero:
Código error SO: 0

Pila de llamadas:
GETNEWID (0)
TCONTROL:CREATEHANDLE (275)
TPREVIEWCONTROL:CREATEHANDLE (63)
TWINCONTROL:CREATE (255)
TSCROLLINGWINCONTROL:CREATE (120)
TPREVIEWCONTROL:CREATE (64)
TPRINTER:PREVIEWCONTROL (509)
CIMPRIMIRLISTADOSEINFORMES:IMPRIMIRRESUMENDECUENTADECLIENTE (1032)
CFORMVISUALIZACIONCLIENTE:BTNBMPIMPRIMIRRESUMENCLICK (3354)
TBTNBMP:ONCLICK (0)
TBTNBMP:CLICK (100)
(b)XCONTROL (156)
TBTNBMP:COMMAND (0)
TBEVEL:WMCOMMAND (275)
RUNFORM (0)
TAPPLICATION:RUN (289)
MAIN (22)

Buenos días,

Le importaría probar si se corrige con el fichero adjunto. No tiene más que hacer un drag & drop del fichero en la ventana del gestor de proyectos. Gracias de antemano.

Un cordial saludo

Hola Ignacio muchas gracias por tu respuesta, con drag and drop no me anduvo pero agregue manualmente el archivo al proyecto y si anduvo el problema que el anterior objeto se mostraba de forma modal y este no intente con lo siguiente
IF (Printer:lPreview)

// Printer:Preview()

WITH OBJECT Printer:PreviewControl()

:oPreviewPage:oPrinter:lPreviewModal:=.T.// (PROBE Y NO ANDUBO)

:nZoomIndex := 8
:oParent:Show()

END WITH

ENDIF//(Printer:lPreview)

pero no funciono y si no consigo hacerlo modal quizá lo pueda hacer cambiando la lógica de mi proyecto pero como hago preview en un numero importante de lugares me llevaría un tiempo impensado

Buenas,

No tiene mucho sentido lo que dice. Para que se vea modal hay que usar ShowModal() eso es todo:
No obstante, solución sencilla:

1) Utilice el método Printer:Preview() sin más

2) Sobrecarga TPreviewControl para que nZoomIndex sea 8:
Saludos

el sentido que tenia mi pregunta es que tengo alrededor de 35 preview en mi proyecto y con la versión anterior siempre el objeto se comporto como modal sin tener que poner showmodal . lo cambie a showmodal a los 35 y ahora funcionan muchas gracias por su respuesta y su ayuda