Controlar el bucle de eventos

Cuando el entorno esté configurado y se muestre la interfaz de usuario inicial, podrá establecer un bucle de eventos para esperar la interacción del usuario.

Para controlar el bucle de eventos

• Ejecute un comando READ EVENTS, que hace que Visual FoxPro comience a procesar los eventos de usuario, como los clics del mouse y las pulsaciones de teclas.

Es importante situar correctamente el comando READ EVENTS en el archivo principal, porque todo el proceso de este archivo se suspende desde el momento en que se ejecuta el comando READ EVENTS hasta que se ejecuta un comando CLEAR EVENTS. Por ejemplo, podría ejecutar un comando READ EVENTS como el último comando de un procedimiento de inicialización, que se ejecutaría después de inicializar el entorno y mostrar la interfaz de usuario. Si no incluye el comando READ EVENTS, la aplicación volverá al sistema operativo después de la ejecución.

Una vez iniciado el bucle de eventos, la aplicación está bajo el control del último elemento mostrado de la interfaz de usuario. Por ejemplo, si se ejecutan los dos comandos siguientes en el archivo principal, la aplicación muestra el formulario Startup.scx:

DO FORM STARTUP.SCX
READ EVENTS

Si no incluye en el archivo principal un comando READ EVENTS o su equivalente, la aplicación se ejecutará correctamente desde la ventana Comandos dentro del entorno de programación. Sin embargo, cuando se ejecuta desde el menú o la pantalla principal, la aplicación aparecerá durante unos instantes y después finalizará.

La aplicación también debe proporcionar una forma de terminar el bucle de eventos.

Para terminar el bucle de eventos

• Ejecute un comando CLEAR EVENTS.

Normalmente el comando CLEAR EVENTS se ejecuta desde un menú o botón de un formulario. El comando CLEAR EVENTS suspende el procesamiento del evento en Visual FoxPro y devuelve el control al programa que ejecutó el comando READ EVENTS e inició el bucle de eventos.

Para ver un programa de ejemplo sencillo, vea Estructurar un programa principal.

Precaución   Necesita establecer una forma de salir del bucle de eventos antes de iniciarlo. Asegúrese de que la interfaz tiene un mecanismo (como un botón o un comando de menú Salir) para ejecutar el comando CLEAR EVENTS.

Restaurar el entorno original

Para restaurar el valor original de las variables guardadas, puede sustituirlas mediante una macro en los comandos SET originales. Por ejemplo, si guardó la configuración de SET TALK en la variable pública cTalkVal, ejecute el comando siguiente:

SET TALK &cTalkval

Nota   Los nombres de variables utilizadas en la sustitución de macros no deben contener el prefijo “m.” porque el punto presupone una concatenación de variables y producirá un error sintáctico.

Si inicializó el entorno en un programa que no sea aquél en el que se está realizando la restauración (por ejemplo, si inicializa llamando a un procedimiento, pero restaura llamando a otro) asegúrese de que puede tener acceso a los valores almacenados. Por ejemplo, almacene los valores para restaurarlos en variables públicas, clases personalizadas o como propiedades de un objeto Application.

Vea también

Inicializar el entorno | Estructurar un programa principal | Compilar una aplicación | READ EVENTS | Agregar archivos a un proyecto