OpenSheet how to judge-CodePudding

Doubleclicked () event: (to achieve the same form, no matter double-click N times, open the form only once)
String ls_id ls_runflag, ls_runproc
TreeViewItem tvi_item
The window w_run
The GetItem (handle, tvi_item)
Ls_id=tvi_item. Data
The SELECT runflag, runproc INTO: ls_runflag, : ls_runproc FROM SYS_menu WHERE SYS_menu. Id=: ls_id;
If ls_runflag="0" or ISnull (ls_runflag) then return

//IF IsValid (w_run)=FALSE THEN Open (w_run)
OpenSheet (w_run, ls_runproc w_wmain, 0, what!)
Want to multiple judgment as IF in the OpenSheet IsValid (w_run)=FALSE THEN Open (w_run) don't know how to add, please advise, thank you

CodePudding user response:

Under the old why can try to OPEN the data refresh w_run!

CodePudding user response:

Try the w_run set to the Instance variables!

CodePudding user response:

Thinking: check all the open loop forms, judge whether the name of the class is

 
The window w_obj, w_run 
Boolean lb_isHave=false 


W_obj=GetFirstSheet () 

If IsValid (w_obj) then 
Do 
If the ClassName (w_obj)=the Lower (ls_runproc) then 
Lb_isHave=true 
The exit 
End the if 

W_obj=GetNextSheet (w_obj) 
Loop while IsValid (w_obj) 
End the if 

If not lb_isHave then OpenSheet (w_run, ls_runproc, w_wmain, 0, what!)