Exit from X

[Alan Lucas]

XP Pro
Build 1545-2029

In a5v5 I could run the following script on all my forms using the CanExit event and it works correctly.

Also, on each form I have a button that exits the user back to a menu. Selecting these buttons would not activate the CanExit event but take the user to the desired menu form and close the previous open form.


SCRIPT:
response = ui_msg_box("","Are you sure you want to exit?, Have you completed the daily tasks?", UI_YES_NO)
if response= UI_YES_SELECTED then
a5.close()
else
cancel()

end if

Now in a5v6 using the X to exit it works, but, if I exit the form using a button to go to a menu screen the CanExit event is also activated and the msg_box displayed, how can I stop this action from happening?

Any help much appreciated

Regards

Alan

[forskare]

RE: Exit from X

Can you supply the code or a brief snippit?

kenn

[Alan Lucas]

RE: Exit from X

Evening Ken,

The code was in my previous post under the heading SCRIPT.

Place this code on the CanExit event of a form that also has a button on the form to exit to another form and close the current form.

The script should only fire when you select the X in the top right hand corner and not when you select a button to exit the form and close the form.

Regards

Alan

[forskare]

RE: Exit from X

Hi Alan,

OK, if I get time to look for it...........

kenn

[CALocklin]

RE: Exit from X

My guess is that the problem is in your statement: "The script should only fire when you select the X in the top right hand corner and not when you select a button to exit the form and close the form."

I can see where that could be a matter of opinion. It wouldn't surprise me that someone else complained that the CanExit event wasn't firing whenever the form was closed. It certainly sounds logical to me that the CanExit event should run whenever the form is closed.

Without doing a lot of research (always a dubious situation), I would suggest adding a [shared?] variable definition in the button action and checking for this variable in the CanExit event script. That way you could tell how the user was attempting to exit the form.

Cal Locklin
www.aimsdc.net

[Alan Lucas]

RE: Exit from X

Thank you Cal,
The mystery is that in a5v5 it works when exiting from X and when exiting from buttons form to form there is no problem. It is only in a5v6 this is happening. Shouldn't v5 andd v6 be the same for this action?

Will dig deeper but I think it will end up being a zip file to Selwyn.

Regards

Alan

[CALocklin]

RE: Exit from X

I could be wrong but I believe this falls under the category of one of those things that "works more correctly" in v6. Each version has done this - tightened up previous "loose ends."

I agree that they can be annoying when you are used to working with them in a way that no longer works but in the long run it's probably for the best.

[Alan Lucas]

RE: Exit from X

Kenn and Carl,

I received the following response from Selwyn;


if you view the xbasic for the action script on the button, you will see
parentform.close(.f.)

change
parentform.close(.f.)
to
parentform.close(.t.)

In xbasic I created a generic "exit form" script using the above in lieu of the standard Action Script for exiting a form. I use this script when using the Exit from X script I submitted in my first report on this thread. It works :)

Alan

[Beltronics]

Re: Exit from X

Alan
I know your post on this subject is very old but I am wondering about the same subject.

I am using V8. I wanted to prevent the user from closing a form. Just one of the forms, not all of them. So, I assigned the code cancel() to the canexit event for that form. It worked, the user can't close the form. Problem is, I can't close down Alpha5 either. I can't close anything unless I do a CTL ALT DEL and abort the application.

Any hints?

[Tom Cone Jr]

Re: Exit from X

Post #18 in this thread from the A5v8 forum might help.

http://msgboard.alphasoftware.com/al...light=a5.close

[Beltronics]

Re: Exit from X

Thanks Tom. I tried that and, at first, it didn't work. Then, I realized I needed to add the code a5.close() after the parentform.code.canexit="".
It worked well after that. I was afraid it would prevent other forms from closing but it didn't. So, that works well. Now, if the powers-at-be will accept this; I'll use it.

[Beltronics]

Re: Exit from X

My joy was shortlived. Now, I can't edit that form. If I open the menu form in edit mode, the program opens a duplicate form. If I remove the canexit code and save it, the original form remains open and the code in effect. I even went to interactive and entered parent.form.code.canexit="" and that didn't clear it. So, how do I now place the menu form in the edit mode? Put yet another button on it?

[Tom Cone Jr]

Re: Exit from X

Jim, I'm sorry. Don't have vers 6 installed. Was a bit worried that the vers 8 approach would be trouble free. Suggest you study all related threads in vers 5 and vers 6 forums for Alpha Five to see what others have done. Search key "a5.close" (include quote marks)

[Beltronics]

Re: Exit from X

I am using version 8. What I did was put two buttons on the main menu. One does parentform.code.canexit=""
and the other does that as well as closes a5.
So, if I want to make edits, I use the one and if I want to close the form and the dbase, I use the other. seems to work OK.