FoxPro/Visual FoxPro - problema con screen off

 
Vista:

problema con screen off

Publicado por rudy  (2 intervenciones) el 05/02/2010 23:28:08
buenas tardes
tengo un problemita con el screen off

tengo mi config.fpw con la linea screen=off para que quite la pantalla de fondo de fox

tengo principal.prg con las siguientes
PUBLIC _INGRESA
DO FORM CLAVE
IF _ingresa
DO menu.mpr
ELSE
QUIT
ENDIF
READ EVENTS

mi formulario clave tiene
showwindow 2 as a top level form
windowstate 0 normal
window type 1-modal

el problema que tengo es que al ejecutarlo despliega el formulario clave
pero luego ya no me muestra el menu

muchasgracias
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

RE:problema con screen off

Publicado por es_binario (757 intervenciones) el 06/02/2010 21:05:14
yo uso
_SCREEN.Visible = .F.

y la pongo en .t. (verdadero) en el form si la clave es aceptada tambien ahi cargo mi menu

esto en el pgr principal de mi programa
WITH _SCREEN
.Visible = .F.
.CAPTION = 'Refaccionarias 1.0'
.WINDOWSTATE = 2
.AUTOCENTER = .T.
.BACKCOLOR = RGB (255,255,255)
.CLOSABLE = .F.
.Movable = .F.
.MaxButton = .T.
endwith

y en el form una vez que la contrase;a y el usuario son validos
*//llama al menu
application.Visible = .T.
_screen.WindowState = 2
_screen.Visible = .T.
DO 'C:\Refacc1pt0\menu\MENU1.MPR'
Thisform.Release
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

RE:problema con screen off

Publicado por Plinio (7841 intervenciones) el 08/02/2010 00:23:11
Lo que pasa es que el formulario que llamas al ser Top Level Form no es modal y tu codigo sigue ejecutandose. Prueba asi y veras que sale el messagebox primero

PUBLIC _INGRESA
DO FORM CLAVE
=messagebox('hola')
IF _ingresa
DO menu.mpr
ELSE
QUIT
ENDIF
READ EVENTS
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

RE:problema con screen off

Publicado por rudy (2 intervenciones) el 08/02/2010 16:42:29
gracias a todos

tome la sugerencia de esbinario y funciono bien.

saludos
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