FoxPro/Visual FoxPro - Ayuda con Foxypreviewer

   
Vista:

Ayuda con Foxypreviewer

Publicado por Ivan ivanfhc@hotmail.com (8 intervenciones) el 04/06/2014 15:54:20
Saludos a todos
Tengo un problema con Foxypreviewer, en la maquina de desarrollo me funciona bien, pero al poner en una nueva maquina no me funciona, ya lo añadi a mi proyecto, lleve toda la carpeta de foxypreviewer a la nueva maquina, pero como llevo compilado mi proyecto, al hacer
do xFileApp = "C:\sistema\forms\FoxyPreviewer\FoxyPreviewer.App"
me sale el error UNRECOGNIZED COMMAND VERB

ya añadi las librerias, los prg que utiliza pero no funciona
Alguien que me ayude muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Ayuda con Foxypreviewer

Publicado por elhabraque (14 intervenciones) el 04/06/2014 23:56:07
Sólo es necesario incorporar el FoxyPreviewer.app en el proyecto y en la misma carpeta del ejecutable. Luego, en el programa inicial incluyes el comando DO FoxyPreviewer.app
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Ayuda con Foxypreviewer

Publicado por Saul (676 intervenciones) el 05/06/2014 06:02:09
Yo lo tengo de la siguiente manera.

hago un PRG llamado reportpreview
y lo llamo de la siguinte manera

cTipoRep = 'cxcreporaltasbajas'

*- Imprime Reporte
DO reportpreview.prg WITH cTipoRep

el prg contiene lo siguiente.


1
2
3
4
5
6
7
8
9
10
11
12
PARAMETERS _Reporte
LOCAL xFileApp
 
xD = SYS(5)
 
xFileApp = xD +"sistema\forms\FoxyPreviewer\FoxyPreviewer.App"
 
DO  &xFileApp 	&&LOCFILE("FoxyPreviewer.App")
 
REPORT FORM &_Reporte TO PRINTER PROMPT PREVIEW NOCONSOLE
 
RETURN
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Ayuda con Foxypreviewer

Publicado por elhabraque (14 intervenciones) el 06/06/2014 00:47:59
No es necesario que llames al FoxyPreviewer cada vez que ejecutes un report. Se carga sólo la primera vez, al entrar en la aplicación, y luego ejecutas el reporte directamente.

Ahora bien, asegúrate que el APP se encuentra en esa carpeta en la nueva máquina. Por eso yo lo pongo en la misma carpeta que el EXE. Así si no quiero que se ejecute, simplemente lo borro; esto me ha ocurrido en algunos equipos que, por algún motivo, la salida de los reportes salía mal con el Foxypreviewer.

Creo una variable pública para guardar la ubicación del Foxypreviewer.

En el programa principal (MainFile), tengo el siguiente código:

** HABILITA LAS FUNCIONALIDADES DEL FOXYPREVIEWER
** SOLO SI LA APLICACION ESTA EN LA CARPETA LOCAL PARA EL DESARROLLO
PUBLIC PUBLI_FoxyPreview
IF FILE(ADDBS(CURDIR()) + 'Foxypreviewer.app')
DO FoxyPreviewer.app
PUBLI_FoxyPreview = ADDBS(CURDIR()) + 'foxypreviewer.app'
ELSE
PUBLI_FoxyPreview = ''
ENDIF

En la llamada al reporte, no es necesario hacer ninguna acción adicional. Si embargo, compruebo que el Foxypreviewer está activo para pasarle algún parámetro, por ejemplo:

IF !EMPTY(PUBLI_FoxyPreview) AND VARTYPE(_Screen.oFoxyPreviewer) == 'O'
WITH _Screen.oFoxyPreviewer
.cLanguage = 'ESPAÑOL'
.lPrinted = .T.

** ........LE PASA LOS VALORES PARA LA MARCA DE AGUA
.cWatermarkImage = PUBLI_Marca_Agua
.nWaterMarkType = PUBLI_Marca_Agua_Tipo && 1 = Colored (default), 2 = B&W
.nWatermarktransparency = PUBLI_Marca_Agua_Trans && (0-1) Transparency, 0 = Transparent, 1 = Opaque
.nWaterMarkWidthRatio = PUBLI_Marca_Agua_Width && (0-1) Proportion that the WM will occupy in page width
.nWaterMarkHeightRatio = PUBLI_Marca_Agua_Height && (0-1) Proportion that the WM will occupy in page height
ENDWITH
ENDIF

REPORT FORM (NombreReport) NOCONSOLE TO PRINTER
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar