* ------------------------------ * Call Screen Objects for processing * ------------------------------ oFrm = g_GetForm("formname") if isnull(oFrm) do form ("formname") else oFrm.WindowState = 0 && Normal window state oFrm.show() endifAlso if the exit is selected I call the following procedure
* ------------------------------ * This procedure finds and closes all open forms * ------------------------------ procedure g_CleanupForms local ln_x clear events for m.ln_x = 1 to _screen.FormCount _screen.Forms[1].release endfor returnNow that you've brought it up, I do have a something that I have been puzzled with. I have a "EXIT" button on my screen, I have coded the FILE, EXIT menu selection, but how do I "hook" into the X button to close the window. If the user selects this button, they simply get a message that says can not quit FoxPro.