¿Cómo agregar un formulario que pida contraseña antes del formulario principal ya creado?

Tengo un programa que ya hice... Tiene un formulario principal que consta de botones que llaman otros formularios etc... Mi problema es que me pidieron agregar un formulario que pida contraseña y un usuario... Por razones de tiempo no puedo ponerme a armar una tabla... Lo que se me ocurrió fue hacer un formulario con 2 campos TEXT y 2 Botones de comando "Aceptar" y "Cancelar" el código del botón Aceptar es este:

IF Thisform.text1.Value = ("XXXX") AND Thisform.text2.Value = ("XXXX") then
Thisform.Release
ELSE
MESSAGEBOX("Usuario o Contraseña Invalido!")
ENDIF
RETURN

Funciona bien... Pero no se como programar el botón "Cancelar" para que cuando cancelen todo el programa se cierre... Cuando pongo el código:

CLEAR EVENTS
CLOSE ALL
RELEASE ALL
QUIT

Dice que Foxpro no puede cerrarse......

Lo que quiero es que me ayuden a programar el Botón "Cancelar" para que cierre todo el programa.

NOTA: Otro problema es que al darle a la X en el formulario de identificación de usuario este se cierra pero deja abierto el principal y se puede trabajar y esto lo quiero evitar... Hacer que cuando le den a la X el programa cierre completamente.

Añade tu respuesta

Haz clic para o