Please can you investigate what is wrong here?
fmSel_Make;sz;t;ŒWSELF
'fmSel'ŒWI'Delete'
ŒWSELF„'fmSel'ŒWI'New' 'Form' 'Open'('size'(sz „ 24.5 73))
t„ŒWI'trSel.New' 'Tree' ('where'(1.5 1,¯4.5 ¯58+sz))
t„ŒWI'bnApply.New' 'Button' ('where' 2 40 1.5 15)('caption' '&Apply Random List')
t ŒWI'onClick' "ŒWI'..trSel.list'((¼30),(1,?29½2),[1.5](›'Item '),¨•¨¼30)ªŒWI'..trSel.DeleteNodes' 8 9 10 29 30"
t„ŒWI'bnCurrList.New' 'Button' ('where' 4 40 1.5 15)('caption' '&Show Current List')
t ŒWI'onClick' "ŒWI'..trSel.list'ªŒTCNL"
I’m setting a list to a tree and than I delete some nodes of the list.
However, sometimes the list completely disappears (you need to hit the button “Apply Random List” several times, let’s say 20 times). Although the list is there (hit the button “Show Current List”), it’s not displayed!
I need this because I hold all tree lists in APL nested arrays and have written a function that occasionally updates the related windows controls by inserting the new nodes and deleting the obsolete nodes (usually in a Defer statement of the Tree control). However sometimes the list completely disappears.