In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Errror al migrar a xailer 8.0 en Printer:PreviewControl()

Foro de Xailer profesional en español
Responder
alexandrasoft
Mensajes: 20
Registrado: Vie Oct 28, 2011 4:12 pm

Errror al migrar a xailer 8.0 en Printer:PreviewControl()

Mensaje por alexandrasoft »

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)
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9246
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Re: Errror al migrar a xailer 8.0 en Printer:PreviewControl()

Mensaje por ignacio »

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
Adjuntos
Printer.zip
(4.35 KiB) Descargado 52 veces
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
alexandrasoft
Mensajes: 20
Registrado: Vie Oct 28, 2011 4:12 pm

Re: Errror al migrar a xailer 8.0 en Printer:PreviewControl()

Mensaje por alexandrasoft »

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
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9246
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Re: Errror al migrar a xailer 8.0 en Printer:PreviewControl()

Mensaje por ignacio »

Buenas,

No tiene mucho sentido lo que dice. Para que se vea modal hay que usar ShowModal() eso es todo:

Código: Seleccionar todo

WITH OBJECT Printer:PreviewControl()

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

:nZoomIndex := 8
:oParent:ShowModal() <<<<<<<<<<<<<<<<<<<<<

END WITH
No obstante, solución sencilla:

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

2) Sobrecarga TPreviewControl para que nZoomIndex sea 8:

Código: Seleccionar todo

CLASS TPreviewControl FROM XTPreviewControl
   PROPERTY nZoomIndex INIT 8
END CLASS
Saludos
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
alexandrasoft
Mensajes: 20
Registrado: Vie Oct 28, 2011 4:12 pm

Re: Errror al migrar a xailer 8.0 en Printer:PreviewControl()

Mensaje por alexandrasoft »

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
Responder