Having a problem "escaping" a ">" character in an xdialog condition statement
if the array is empty I dont want to display it, what am I getting wrong?
thx
if the array is empty I dont want to display it, what am I getting wrong?
thx
Code:
delete base_show_acft delete base_show_oper dim base_show_acft[0] as p dim base_show_oper[0] as p dim indexA as n dim IndexO as n filter = "base_unique="-quote(:Base_Master_Tidy:Unique.value) base_name = rtrim(:Base_Master_Tidy:Base.value) base_show_acft.initialize_from_table("logging",Filter,"reg") base_show_acft.resize(base_show_acft.first_empty()-1) dim acft_size as n = base_show_acft.size() acft_size_text = "["-acft_size-"]" base_show_oper.initialize_from_table("Appendix_c",Filter,"Operator") base_show_oper.resize(base_show_oper.first_empty()-1) dim oper_size as n = base_show_oper.size() oper_size_text = "["-oper_size-"]" dlg_title = "Current Location Allocations" ui_modeless_dlg_box(dlg_title,<<%dlg% {background=pale blue} {color=Dark blue on Light Green} {region} {text=96Base_name}<%T=Close_button_Pushed;I=$$generic.exit%!Close_Button_event>; Aircraft{sp=2}{text=12acft_size_text}; [SIZE=12px][FONT=Georgia][B][COLOR=#e74c3c]{condition=(acft_size\>0)}[/COLOR][/B][/FONT][/SIZE] [%O==FmtShowAcft(eval(value))%.100,10indexA^#base_show_acft]; {condition=.t.} Operators{sp=2}{text=12oper_size_text}; [SIZE=12px][FONT=Georgia][B][COLOR=#e74c3c]{condition=(oper_size\>0)}[/COLOR][/B][/FONT][/SIZE] [%O==FmtShowOper(eval(value))%.100,10indexO^#base_show_oper]; {endregion} %dlg%,<<%code% if a_dlg_button = "Close_Button_event" then a_dlg_button = "" ui_modeless_dlg_close(dlg_title) end if %code%)
Comment