Botón de cerrar

[Ciro Vasquez]

Tengo un pequeño programa que llama que activa lo siguiente:

_SCREEN.MaxButton = .F.
_SCREEN.MinButton = .T.
_SCREEN.WindowState = 2
_SCREEN.Closable = .T.

do mimenu.mpr
read events

*El problema es que cuando le doy en salir "X de color rojo", me dice
no se puede salir de foxpro
y deseo que al hacer clic ahi se cierre, como le hago ?

[Ciro Vasquez]

Encontré la respuesta
http://es.narkive.com/2007/12/20/1368633-mensaje-no-se-puede-salir-de-visual-foxpro.html
Gracias!!!

[Luis Maria Guayan]

Mira este artículo de Mike Lewis traducido en PortalFox

-- Cómo evitar el mensaje: No puede salir de Visual FoxPro --
http://www.portalfox.com/index.php?name=Sections&req=viewarticle&artid=47

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Malenkov]

En las opciones generale del menú agrega la línea

On shutdown quit

Y con eso se corrige

Espero aun te sirva el dato

Saludos

LSCI Carlos A. Lara Plascencia
MSN malen...@hotmail.com

-----Mensaje original-----
De: publice...@googlegroups.com
[mailto:publice...@googlegroups.com] En nombre de Ciro Vasquez
Enviado el: lunes, 23 de enero de 2012 10:38 p.m.
Para: Comunidad de Visual Foxpro en Español
Asunto: [vfp] Botón de cerrar

[Antonio Meza]

hola

 

Use "On shutdown quit" en mi prg de inicio y funciono bien, ahora ya se cierra bien mi programa!!!

 

gracias por el aporte!!

 

saudos!!!

[TheNewInquirer]

Te falta ON SHUT DOWN. Revisa este enlace:

https://groups.google.com/group/publicesvfoxpro/browse_thread/thread/540f90c30aef35c1/66abc30913c911be?hl=es&lnk=gst&q=curso+fox+5+min#66abc30913c911be

Ahi dice:

Te comento ahora sobre algo básico sobre el PROGRAMA PRINCIPAL y el
GENERADOR DE PROYECTOS.
En Fox debes crear un archivo de proyecto y agregar a
este proyecto tus scx, prg, dbc, dbf, txt, etc.
Debes crear un prg que sérá el programa principal, para que te sea
más
facil controlar algunas opciones. Como no veo donde  puedo adjuntar
un archivo, te pondré aquí el código. Cuidate!

*titulo,ocultar menu, fondo y maximizar
CLEAR
_SCREEN.CAPTION="My Calculator 1.0"
SET SYSMENU TO
_SCREEN.PICTURE="C:\My Calculator\logo.jpg"
_SCREEN.WINDOWSTATE=2
*configurando el entorno del sistema
PUSH MENU _MSYSMENU
SET DEFAULT TO "C:\My Calculator"
*SET SAFETY OFF     Esta linea desactiva los mensajes de seguridad de
sistema de Visual Foxpro.
SET DATE ITALIAN
SET TALK ON
SET CENTURY ON
SET DELETE ON
*ON SHUTDOWN DO BAJASIS     Esta linea sirve para cerrar Visual Fox
dando click en la X de cerrar esquina superior izq.
DO FORM "Bienvenida.scx"
*DO "main.mpr"  Activa esta linea solo vas a usar un menú ya
existente.
READ EVENTS
*finaliza el programa
*ON SHUTDOWN Marca el final del procedimiento para cerrar Fox.
CLEAR EVENTS
POP MENU _MSYSMENU
CLOSE ALL
RETURN

* Si gustas puedes crear un .prg con este codigo por aparte y el
main.prg llamara a esta subrutina sin problemas. Recuerda
"empaquetar"
o agregar todos los .prg, forms, dbf, etc al proyecto.

PROCEDURE BAJASIS
SET SAFETY OFF
close database
CLEAR EVENTS
POP MENU _MSYSMENU
ON SHUTDOWN
CLOSE ALL
QUIT
ENDPROC

** En el administrador de proyectos dale: pestaña código, click
derecho al main.prg, establecer principal.
* Luego, boton generar, Volver a Generar el proyecto, Volver a
compilar todos los archivos, mostrar errores.
** Si deseas generar el programa final elige Generar Ejecutable
* Los asteriscos sirven para que el compilador de Fox ignore lo que
sigue. Son para poner comentarios.