xDialog - Insert option

[johnkoh]

Hi,

How do you insert 2nd or more xDialog statements?

vResult= UI_dlg_box("title 1",<<%dlg%
 ... do something
%dlg%,<<%code%

If a_dlg_button = "my_event_name" then
  'I want to add 2nd xDialog form here ....
     2nd_xdialog = ui_dlg_box("more xDialog",<<%dlg%
        ....do something for 2nd xdialg here ...
        %dlg%,<<%code%
         if a_dlg_button = "my_wnd_events" then
         end if
        %code%)
          If 2nd_xDialog = "ok" button command here 
          ... Something ..
          end if.
end if
%code%)

[CALocklin]

Re: xDialog - Insert option

You have to call a function that runs the xdialog. That function can be at the bottom of the current script/function. Of course, if it's a generic xdialog then you should put it in a separate function in the Code tab but that's probably not likely in this case.

For example:

script start
....
vResult= UI_dlg_box("title 1",<<%dlg%
... do something
%dlg%,<<%code%
IF a_dlg_button = "my_event_name"
second_xdialog()
END IF
%code%)
... script continues...
script ends

FUNCTION Second_xdialog as C ()
<create 2nd xdialog here..
END FUNCTION

---------------------

Here's another hint -- take the %dlg% section out and make it separate like:
dlg_text = %dlg%
...
%dlg%

dlg_result = ui_dlg_box( "title 1", dlg_text, <<%code%
....
%code%)

the advantage is that the "dlg_text" is just a crlf string and you can make all kinds of modifications to it before actually displaying the xdialog. For example, you might want to display some type of count that varies from run to run. You could to that by displaying a variable in a field object but it's much nicer and more professional looking if it becomes part of the text string.

Let's say you exported records for some reason and want to tell the user when the export is done and how many were exported ...

ex_recs = 6

dlg_text = <<%dlg%
DONE;
{sp};
You exported [[ex_recs]] records.;
{sp};
{justify=center}<*15OK>
%dlg%

dlg_text = stritran( dlg_text, "[[ex_recs]]", ltrim(str( ex_recs )) )

DIM dlg_result as C
dlg_result = ui_dlg_box( "", dlg_text, <<%code%
%code%)

The above dialog would correctly display the number of exported records whether it was 0 or 9,999,999,999. (Yeah, I know, good luck exporting that many.)

The use of [[...]] for the variable to be replaced in the initial dlg_text string is somewhat arbitrary but not completely. It could be replaced with a simple "x" (or any other string) but we really want something that is highly unlikely to occur anywhere else and something that will show up easily if we forget to replace it. The double brackets aren't going to show up anywhere else in an xdialog and if you forget to replace them it will be very obvious in the resulting xdialog. It's also pretty obvious in the xdialog script - just look at the code above and tell me that the "[[ex_recs]]" doesn't stand out.

The use of the same variable name inside the double brackets is also not necessary but the consistency sure makes it easier to work with.

BEWARE, this is one of those things that will get more and more use once you get started with it.

[johnkoh]

Re: xDialog - Insert option

Good Morning Cal,

Thank you, I will try the first one.

[G Gabriel]

Re: xDialog - Insert option

Look into {embedded}