Wait_until

[johnkoh]

Hello

I want to check a form (or Non-A5 Windows) is opened or not with Wait_until().

I have attached the code.

' a form or Non-A5 window is already opened and It is an xdialog.
vlayout = "sample form"
vResult = .f.
vflag = file_is_open(vlayout)
' or   vflag = is_object(vlayout)

If vFlag = .t.    'The FILE_IS_OPEN() function returns .T. (TRUE) if a file is open.   but I could not get " .t. " statement when it is opened.
    vCheck ="Opened"
else
    vCheck="closed"
end if
        
[COLOR=#ff0000][SIZE=4]vResult = wait_until(vCheck ="closed",1,2)  [/SIZE][/COLOR][COLOR=#0000ff][SIZE=4]'Does wait_until should runs again after 2 second later?[/SIZE][/COLOR][COLOR=#ff0000][SIZE=4][/SIZE][/COLOR]

If vResult = .t. then        
     msgbox("still opened ")
else
    msgbox("closed ", "after closed, open another form or xdialog ")
        
end if

Does wait_until should runs again after 2 second later until the condition, vCheck="closed" , is .t. statement ?

[Ray in Capetown]

Re: Wait_util

Nope

If vResult = .F. then        
     msgbox("still opened ")
else
    msgbox("closed ", "after closed, open another form or xdialog ")
end if

When the time elapses the next line will execute but vResult will reflect the status of the wait condition at the time of release

end if

[johnkoh]

Re: Wait_until

Hi Ray,

vResult will reflect the status of the wait condition at the time of release

Then How would you write for checking the form is opened or not until closed it?

[Stan Mathews]

Re: Wait_until

Are you trying to pause a script until an xdialog is closed or are you trying to trigger some code when the xdialog is closed?

[johnkoh]

Re: Wait_until

Hi Stan,

are you trying to trigger some code when the xdialog is closed?

Yes, This is what I want to do.

[Stan Mathews]

Re: Wait_until

Why not just code the xdialog?

ui_modeless_dlg_box("Name",<<%dlg%
Name: [.20name];
{lf};
<Close>;
%dlg%[COLOR="#FF0000"],<<%code%
if a_dlg_button = "close" then
   msgbox("Closed")
   ui_modeless_dlg_close("name")
   end
end if
%code%[/COLOR])

[Ray in Capetown]

Re: Wait_until

On the matter of using wait_until
You just had the logic wrong way

[johnkoh]

Re: Wait_until

Stan,

I have few different case to apply this action (checking opened or closed a Form).

case 1: Started from xdialog -> Display the records with pdf -> after work with a PDF and closed this pdf window -> **When PDF window is closed then Trigger other action, example -- open an xdialog, ask printed it good or not -> Re-Open the PDf window again or store the Print result to table **

case 2: Started from xDialog(*it is not Modeless dlg) -> Open A5-Forms but I have the problems at here,

(1) not able to activate a A5-Form without close an xDialog The Ui_dlg_Hide() did not hide the xDialog
(2) If I closed an xDialog, How do I open again an xDialog after closed A5-Form?
(2-a) What If My A5-Form's Close Button is included the open an xDialog and another A5-Form actions, How do I know the condition that it was opened by an xdialog or other form?


On case 2, I think the solution is that I have to change to Modeless - xDialg from standard xDialog. I have not tried it yet and am still working with case 1.

Thank you

[johnkoh]

Re: Wait_until

Ray,

I choose Wait_Until() because, from Help

Alpha Five checks the Logical_Expression every Every_N_Seconds.