Error al cerrar
Hola, cuando intento cerrar mi aplicacion me sale un mensaje que dice "CANNOT QUIT VISUAL FOX".
Alguien me puede ayudar a solucionarlo????
Gracias y un saludo.
Alguien me puede ayudar a solucionarlo????
Gracias y un saludo.
coloca este codigo en el evento de salida de la aplicacion..
CLOSE DATABASES ALL
CLOSE TABLES ALL
CLEAR ALL
CLOSE ALL
CLEAR EVENTS
QUIT
no se que comando esta ejecutando tu aplicacion al momento de salir, asi que, a la segura... ja ja ja
Atte.
FoxLeonardo
www.empresadae.cl
CLOSE DATABASES ALL
CLOSE TABLES ALL
CLEAR ALL
CLOSE ALL
CLEAR EVENTS
QUIT
no se que comando esta ejecutando tu aplicacion al momento de salir, asi que, a la segura... ja ja ja
Atte.
FoxLeonardo
www.empresadae.cl
LOCAL xvar
xvar=MESSAGEBOX("Esta Seguro que "+CHR(13)+" desea Salir......",4+16+256,"Salir ")
IF xvar=6 then
CLOSE DATABASES
clear windows all
SET SYSMENU TO DEFAULT
CLEAR EVENTS
ENDIF
aplica eso en el menu !!
y desactiva tu boton del VFP
con
_screen.closable=.F.
bye
salu2
xvar=MESSAGEBOX("Esta Seguro que "+CHR(13)+" desea Salir......",4+16+256,"Salir ")
IF xvar=6 then
CLOSE DATABASES
clear windows all
SET SYSMENU TO DEFAULT
CLEAR EVENTS
ENDIF
aplica eso en el menu !!
y desactiva tu boton del VFP
con
_screen.closable=.F.
bye
salu2
