Discussion:
REPORT FORM XX NOCONSOLE PREVIEW
(demasiado antiguo para responder)
oscar garcia mata
2004-09-22 23:27:17 UTC
Permalink
Hola todos...

Tengo una pregunta:
¿Existe alguna forma de evitar que en los informes que se ejecutan con
REPORT FORM XX NOCONSOLE PREVIEW, desplieguen la leyenda "Diseñador de
informes - XX.frx" en la parte superior de la pantalla?.

Trabajo en VFP 5.0
De antemano muchas gracias.



----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Luis María Guayán
2004-09-23 02:08:43 UTC
Permalink
Puedes usar este truco:

-- Print Preview en ventana Maximizada versión OOP --
http://www.portalfox.com/article.php?sid=505
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by oscar garcia mata
Hola todos...
¿Existe alguna forma de evitar que en los informes que se ejecutan con
REPORT FORM XX NOCONSOLE PREVIEW, desplieguen la leyenda "Diseñador de
informes - XX.frx" en la parte superior de la pantalla?.
Trabajo en VFP 5.0
De antemano muchas gracias.
-----------------------------------------------
PortalFox :: Nada corre como un zorro
http://www.portalfox.com
PortalFox - NNTP Forum Gateway
-----------------------------------------------
oscar garcia mata
2004-09-30 00:07:49 UTC
Permalink
Hola luis, tu consejo me sirvio, ya lo probe y efectivamente desaparece el
titulo no deseado, pero que crees, también me desaparece la barra de
desplazamiento horizontal, y como mi reporte esta diseñado en formato
horizontal no puedo ver los datos del lado derecho... a menos claro que le
de un clic en el informe para activar el zoom y luego le de otro en el
extremo derecho para regresarlo al tamaño normal.
Mi pregunta ahora es, ¿Como puedo conservar la barra de desplazamiento
horizontal?

----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Luis María Guayán
2004-09-30 00:50:25 UTC
Permalink
Fácil, configura la propiedad SrollBars del formulario

oForm = CREATEOBJECT("Form")
WITH oForm
.Caption = "Tu Titulo del Preview"
.ScrollBars = 3 && Ambas barras
.WindowState = 2 && Maximized
.Show()
REPORT FORM MiInforme PREVIEW WINDOW (.Name)
.Release()
ENDWITH
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by oscar garcia mata
Hola luis, tu consejo me sirvio, ya lo probe y efectivamente desaparece el
titulo no deseado, pero que crees, también me desaparece la barra de
desplazamiento horizontal, y como mi reporte esta diseñado en formato
horizontal no puedo ver los datos del lado derecho... a menos claro que le
de un clic en el informe para activar el zoom y luego le de otro en el
extremo derecho para regresarlo al tamaño normal.
Mi pregunta ahora es, ¿Como puedo conservar la barra de desplazamiento
horizontal?
-----------------------------------------------
PortalFox :: Nada corre como un zorro
http://www.portalfox.com
PortalFox - NNTP Forum Gateway
-----------------------------------------------
Leticia
2004-10-07 21:07:29 UTC
Permalink
excelente como resolver este caso, yo lo utilizé y sin problemas lo
realiza pero cuando genero el .exe de mi proyecto el informe se carga en
la misma ventana de mi formulario desde donde generé el filtro, acaso hay
algo mas que completar por fa ayudenme lo antes posible!!!


----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Luis María Guayán
2004-10-08 00:11:50 UTC
Permalink
Prueba cambiando el la propiedad Name del Form (en el ejemplo tomo un nombre
aleatorio generado por SYS(2015))

oForm = CREATEOBJECT("Form")
WITH oForm
.Caption = "Tu Titulo del Preview"
.ScrollBars = 3 && Ambas barras
.WindowState = 2 && Maximized
.Name = SYS(2015)
.Show()
REPORT FORM MiInforme PREVIEW WINDOW (.Name)
.Release()
ENDWITH
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by Leticia
excelente como resolver este caso, yo lo utilizé y sin problemas lo
realiza pero cuando genero el .exe de mi proyecto el informe se carga en
la misma ventana de mi formulario desde donde generé el filtro, acaso hay
algo mas que completar por fa ayudenme lo antes posible!!!
-----------------------------------------------
PortalFox :: Nada corre como un zorro
http://www.portalfox.com
PortalFox - NNTP Forum Gateway
-----------------------------------------------
Leticia
2004-10-08 13:33:51 UTC
Permalink
Ya hice el cambio y no se ha resuelto el problema, en el formulario desde
el cual filtro y en el cual se despliega el informe desde el ejecutable,
está en modo normal no maximizado, y en la propiedad showwindow = 2 (as
top level), tendrá algo que ver estos datos. utilizé el sys(2015) tambien
(que indico con esta propiedad), pero no pasa nada sigue igual me podes
ayudar otra vez Luis Maria u otro que lea este mensaje?, gracias

----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Luis María Guayán
2004-10-08 14:27:03 UTC
Permalink
El tema es que si especificas un formulario Como de Nivel Superior, los
formularios secundarios están limitados a los bordes del formulario de nivel
superior. Para que un formulario secundario no quede limitado se debe
configurar la propiedad Desktop = .T.

oForm = CREATEOBJECT("Form")
WITH oForm
.Caption = "Tu Titulo del Preview"
.ScrollBars = 3 && Ambas barras
.WindowState = 2 && Maximized
.Name = SYS(2015)
.Desktop = .T.
.Show()
REPORT FORM MiInforme PREVIEW WINDOW (.Name)
.Release()
ENDWITH

O bien puedes hacer el formulario donde se mostrará el reporte como
formulario de nivel superior

oForm = CREATEOBJECT("Form")
WITH oForm
.Caption = "Tu Titulo del Preview"
.ScrollBars = 3 && Ambas barras
.WindowState = 2 && Maximized
.Name = SYS(2015)
.ShowWindow = 2
.Show()
REPORT FORM MiInforme PREVIEW WINDOW (.Name)
.Release()
ENDWITH
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by Leticia
Ya hice el cambio y no se ha resuelto el problema, en el formulario desde
el cual filtro y en el cual se despliega el informe desde el ejecutable,
está en modo normal no maximizado, y en la propiedad showwindow = 2 (as
top level), tendrá algo que ver estos datos. utilizé el sys(2015) tambien
(que indico con esta propiedad), pero no pasa nada sigue igual me podes
ayudar otra vez Luis Maria u otro que lea este mensaje?, gracias
-----------------------------------------------
PortalFox :: Nada corre como un zorro
http://www.portalfox.com
PortalFox - NNTP Forum Gateway
-----------------------------------------------
Leticia
2004-10-08 19:06:27 UTC
Permalink
disculpame Luis M. pero hice los cambios y cuando quiero ejecutar el
formulario me dice que la propiedad es de solo lectura, a que se debe
esto?, esto ocurre con los tipos de cambios, gracias

----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Luis María Guayán
2004-10-08 23:56:30 UTC
Permalink
Lo que se me ocurre es que crees una definición de clase de un formulario e
instancies dicho formulario:

oForm = CREATEOBJECT("MiForm")
WITH oForm
.Caption = "Tu Titulo del Preview"
.Show()
REPORT FORM MiInforme PREVIEW WINDOW (.Name)
.Release()
ENDWITH

DEFINE MiForm AS FORM
ScrollBars = 3 && Ambas barras
WindowState = 2 && Maximized
Name = SYS(2015)
Desktop = .T.
ENDDEFINE

La definición del formulario la debes tener en una libreria .PRG y haber
ejecutado SET PROCEDURE TO Libreria.PRG ADDITIVE
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Post by Leticia
disculpame Luis M. pero hice los cambios y cuando quiero ejecutar el
formulario me dice que la propiedad es de solo lectura, a que se debe
esto?, esto ocurre con los tipos de cambios, gracias
-----------------------------------------------
PortalFox :: Nada corre como un zorro
http://www.portalfox.com
PortalFox - NNTP Forum Gateway
-----------------------------------------------
Leticia
2004-10-11 14:30:40 UTC
Permalink
si, con esto si funciona pero no me muestra los controles para imprimir,
que salen normalmente con le preview, que hago ahora?, sorry por lo hincha
que soy

----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Luis María Guayán
2004-10-12 03:26:46 UTC
Permalink
sorry por lo hincha que soy
:-))))

sorry por no saber ya que hacer ...

Saludos,
--
Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos
Jose Guillermo
2004-10-12 11:38:54 UTC
Permalink
Hola a todos.
Una pregunta para todos: ¿ Es que VFP es el más feo de todos ?

"TODOS LOS PREVIEW DEL MUNDO SON EN PANTALLA MAXIMIZADAS" menos VFP.

Todo nos lo dejan a nosostros, pero gracias a personas coomo ustedes
podemos resolver esos "inconvenientes" y esto hace al ZORRO más
inteligente cada día.

Buen Día





----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
david alarcon
2004-10-13 03:34:44 UTC
Permalink
Hola por que no intentas a la antiguita?

SET CONSOLE OFF
DEFINE WINDOW wxPrevia ;
FROM 0, 0 TO 50,75 ;
CLOSE FLOAT GROW ZOOM NOMINIMIZE;
SYSTEM;
TITLE "Vista Previa del Reporte"
ZOOM WINDOW wxPrevia MAX
GOTO TOP
SET STATUS BAR OFF
REPORT FORM mireporte PREVIEW WINDOW wxPrevia

Asi lo hago y no he tenido los inconvenientes que mencionan en el hilo

Saludos

David


Con Fox, todo se puede !!

----------------------------------------------
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa
-----------------------------------------------
Pablo Brunet
2004-11-09 21:22:39 UTC
Permalink
Hola a todos!!!
leí todo el hilo y derive en este código:
oForm = CREATEOBJECT("Form")
WITH oForm
.Caption = "VENTANA DE INFORME DE PRUEBAS"
.ScrollBars = 3 && Ambas barras
.WindowState = 2 && Maximized
.Name = "pablo"
.icon= "c:\mis documentos\proyectos de visual foxpro\foldmanu.ico"
.Show()
REPORT FORM inform1.frx PREVIEW WINDOW pablo
.Release()
ENDWITH

el problema es que no me toma memuestra el icono en formulario contenedor de
informe, aparece y luego desapare, dejando el que viene por defectos, el que
es como una agendita azul, porque?
Post by david alarcon
Hola por que no intentas a la antiguita?
SET CONSOLE OFF
DEFINE WINDOW wxPrevia ;
FROM 0, 0 TO 50,75 ;
CLOSE FLOAT GROW ZOOM NOMINIMIZE;
SYSTEM;
TITLE "Vista Previa del Reporte"
ZOOM WINDOW wxPrevia MAX
GOTO TOP
SET STATUS BAR OFF
REPORT FORM mireporte PREVIEW WINDOW wxPrevia
Asi lo hago y no he tenido los inconvenientes que mencionan en el hilo
Saludos
David
Con Fox, todo se puede !!
-----------------------------------------------
PortalFox :: Nada corre como un zorro
http://www.portalfox.com
PortalFox - NNTP Forum Gateway
-----------------------------------------------
Loading...