I would like to be able to have open two modeless dialog boxes with Box1 holding the values of an array, and Box2 display the choice made in Box1. I have worked on this through trial and error all day and I have come to the point of asking for help. Especially since I am not sure it can be done, at least the way I am thinking about it. There must be an evaluate expression and refresh thing, or something, I'm missing. The code below has the first dialog broken up into strings so the height of the box can be dynamic to the number of lines in the array. Any help would be most appreciated.
Code:
dim z1 as C dim z3 as C dim z4 as C dim vdlgF as C dim vnTcount as N dim vcChoice as C dim vLArea as C dim shared B1Choice as C vLArea = <<%a% blue red yellow green purple orange %a% vnTcount = w_count(vLArea,crlf()) ' =========== BOX 1 ========== z1 = <<%dlg% {position=1,3} {region} Select Area:| [.40,%dlg% z3 = <<%dlg% B1Choice^#a_vcChoice]; {endregion}; {line=1,0};%dlg% vdlgF = z1 + ("" + vnTcount) + z3 auto_list_vcChoice = Var->vLArea DELETE a_vcChoice DIM a_vcChoice[vnTcount] as c a_vcChoice.initialize(auto_list_vcChoice) FieldChoice = ui_modeless_dlg_box("AreaSelect",vdlgF) '========== BOX 2 ================ ui_modeless_dlg_box("Fields",<<%dlg% {position=6,3} you have chosen the color [.40,10^#B1Choice]; {lf}; <Close><Refresh>; %dlg%,<<%code% IF a_dlg_button = "Refresh" THEN ui_modeless_dlg_refresh("AreaSelect") ui_modeless_dlg_refresh("Fields") else if a_dlg_button = "Close" THEN ui_modeless_dlg_close("Fields") ui_modeless_dlg_close("AreaSelect") END IF %code%)
Comment