How to detect when closing an XDialog with Red X

[gkpurcey]

Specifically, how can I make the red X in the title bar of an XDialog box work the same as my Cancel button? In other words, in my cancel button, I have a confirmation dialog to ask the user if they are sure they want to abandon changes. But closing with the red X simply closes the dialog with no prompt whatsover.

I have tried to trap for varC_result="" , which is the value closing with the red X sets it to. But this works fine after the dialog already has closed, but seems to interfere with the normal event handling routines I have if I try to do this in the %code% section. Seems this should be relatively easy, but I am not seeing it.

If anyone has any ideas for me I would greatly appreciate the help. Thanks.

[Steve Workings]

Re: How to detect when closing an XDialog with Red X

I don't know that you can trap the red-x close. Instead, when I need to force something like you do, I make it a ui_modeless_dlg_box. This disables the red-x, and then you need to provide your various buttons and control code.

[Stan Mathews]

Re: How to detect when closing an XDialog with Red X

You can have the red-x not appear if you make the first command of the ui_dlg_box() be
{toolcaption}

Contrast the behavior of

ui_dlg_box("Xdialog Sample", <<%dlg%
<30,2 Sample>;
%dlg%)

with

ui_dlg_box("Xdialog Sample", <<%dlg%
{toolcaption}<30,2{TOOLCAPTION} Sample>;
%dlg%)

[Steve Workings]

Re: How to detect when closing an XDialog with Red X

Thanks Stan, I learned something today. Now if I could only take the rest of the day off....

[gkpurcey]

Re: How to detect when closing an XDialog with Red X

Stan,

I like that solution much better than having the red X visible and having to duplicate some code somewhere.
Thanks very much!

Gordon

[gkpurcey]

Re: How to detect when closing an XDialog with Red X

By the way, is there a reason you repeated the {toolcaption} command more than once?
it seems to do the job with only one in it...

[Stan Mathews]

Re: How to detect when closing an XDialog with Red X

I copied the sample from the help files. (local)

[Stan Mathews]

Re: How to detect when closing an XDialog with Red X

Looks like it should be

ui_dlg_box("Xdialog Sample", <<%dlg%
{toolcaption}<30,2Sample>;
%dlg%)

[gkpurcey]

Re: How to detect when closing an XDialog with Red X

Thanks again Stan. Wasn't sure if there was something I was missing.

[Stan Mathews]

Re: How to detect when closing an XDialog with Red X

Actually as the example from the local help is executed the xdialog result is

rslt = ui_dlg_box("Xdialog Sample", <<%dlg%
{toolcaption}<30,2{TOOLCAPTION} Sample>;
%dlg%)


? rslt
= "{TOOLCAPTION} Sample"

Likely not what is wanted.

I think the wiki example is better.

'A standard modal Xdialog. (escape to exit)

ui_dlg_box("Toolcaption Test",<<%dlg%
{toolcaption}
This is a modal dialog with the \{toolcaption} command.;
Notice that it does not have the red X button in the title bar.;
;
%dlg%)

[csda1]

Re: How to detect when closing an XDialog with Red X

Of course you can run code with a red X of an Xdialog.

Just use the code below in the Xdialog body substituting your xdialog event name, and place the code in the XDialog event handler. An example is in the code archive here that actually shows usage.

{can_exit=xdialog_event_name}

[CALocklin]

Re: How to detect when closing an XDialog with Red X

And if you want to trap the red X, you might also want to stop someone from using the ESC key. Use {On_Key=ESC} to do that.

Oops. This may not be necessary in v10. I seem to recall that they changed from "The ESC key closes the xdialog unless you write code to keep it open using {On_Key=ESC}" in previous versions to "The ESC key doesn't close the xdialog unless you add code to close it using {On_Key=ESC}". This is the kind of thing that can drive you crazy when working with multiple versions of A5. Oh well, it's still good to know how to control what happens with the ESC key.

[Stan Mathews]

Re: How to detect when closing an XDialog with Red X

Escape still closes one in V10 for me.

[CALocklin]

Re: How to detect when closing an XDialog with Red X

Escape still closes one in V10 for me.

Thanks Stan. That doesn't surprise me. It was late so I didn't check before posting but remembered running into some cases where the xdialog didn't close the way I expected it to by default. I thought it was a difference between versions somewhere but I could be wrong. Mostly that was a disclaimer. The basic point is that, either way, it can be controlled with the {On_Key=ESC} command.

[csda1]

Re: How to detect when closing an XDialog with Red X

Hi Cal,

In general, from a user interface point of view, an escape should not close a dialog box. The reason is, if the key auto-repeats, it will close the current dialog, then the dialog before it, and the next to the number of escaped pressed. Assuming the dialogs need to be handled, or viewed, this may be incorrect behavior,

On the other hand, if subsequent escape keys are not an issue, then being able to escape the dialog is useful for the user.