On Windows, clicking on the Close box of a 4D application will close the application. This is the standard behavior for a Windows application, but you may want to alter it.
To alter this behavior, use the following work-around:
- Before quitting the database, 4D always run the On Exit method. Add the following code in that method:
- In the On Startup method, add the following statement to initialize the <>Quit4D variable:
<>Quit4D := False
When someone tries to quit the application using the close box, the application will loop in this process until <>Quit4D becomes False. No matter what, the application will not quit until <>Quit4D is set to True. To quit, you just need to set <>Quit4D to TRUE before executing the QUIT 4D command.