Mein Code sieht wie folgt aus. Er funktioniert gut, wenn ich nacheinander auf Option 1 und 2 klicke, aber wenn ich ständig auf Option 1 klicke, werden mehrere Listenfelder generiert, was meine Benutzer verwirren würde. Wie könnte ich den Code optimieren? Vielen Dank.
Weitere zwei Fragen sind:
1. Wenn ich ein Bedienfeldfeld lösche, wird dann auch das umrahmte Feld (wie das Textfeld) gelöscht oder einfach nicht angezeigt?
2. Wie kann ich die Hierarchie eines modalen Fensters ermitteln?
dt = Current Data Table();
If( Is Empty( dt ),
Stop(),
nc = N Col( dt )
);
openDTs = {};
For( i = 1, i <= N Table(), i++,
Insert Into( openDTs, Data Table( i ) << getname )
);
tableSelBox = Expr(
//Panel Box( "Select Limit Table",
lbtableSel = List Box( openDTs, width( 150 ), nlines( 6 ), maxselected( 1 ), ),
//),
);
nw = New Window( "Auto Plot",
modal,
hb = H List Box(
V List Box(
Panel Box( "Mode Selection",
Spacer Box( size( 100, 0 ) ),
rbMethod = Radio Box(
{"With Current Limit", "Without Current Limit"},
rbSel = rbMethod << get selected;
dbAfterpb = colSelLstBox << Next();
If( rbSel == "With Current Limit",
pb << Sib Append( tableSelBox ),
);
If( rbSel == "Without Current Limit",
dbAfterpb << Delete;
lbtableSel << Delete
),
),
),
Panel Box( "Action",
Spacer Box( size( 100, 0 ) ),
okBb = Button Box( "OK", Stop() ),
cancelBb = Button Box( "Cancel", Stop() ),
),
),
pb = Panel Box( "Select Columns",
colSelLstBox = Filter Col Selector( dt, nlines( Min( nc, 13 ) ) ),
),
pb << Sib Append( tableSelBox ),
),
);
