列リストボックス/フィルター列セレクターデータテーブルを変更するオプションを追加時々、ユーザーが使用するデータテーブルを変更できるようにするユーザーインターフェイスを構築すると便利です(現在、これに対する私の解決策は、データテーブルを変更するオプションを「決して」追加しないことです)。 私の知る限り、現在、使用するデータテーブルを変更するには、フィルター列セレクターと列リスト ボックスを再作成する必要があります。
これはあなたがしなければならないと私が思うことです:
もっと見る...
これは私がそれをやりたい方法です:
もっと見る...
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Probe.jmp", invisible);
dt1 = Open("$SAMPLE_DATA/Big Class.jmp", invisible);
dt2 = Open("$SAMPLE_DATA/Semiconductor Capability.jmp", invisible);
close_dts = Expr(
Try(Close(dt, no save));
Try(Close(dt1, no save));
Try(Close(dt2, no save));
);
change_table = Expr(
cur_table = (lb << get selected)[1];
fcs << Set Data Table(cur_table);
clb << Set Data Table(cur_table);
);
nw = New Window("Col List Box Example",
H List Box(
lb = List Box(Get Data Table List(),
change_table
),
fcs = Filter Col Selector(Datatable(dt)),
clb = Col List Box(Datatable(dt), all, numeric, max selected(1), nlines(5), <<MODELING type=""></MODELING>
名前のデフォルトはここ (1) です。 dt = Open("$SAMPLE_DATA/Probe.jmp", 非表示); dt1 = Open("$SAMPLE_DATA/Big Class.jmp", 非表示); dt2 = Open("$SAMPLE_DATA/Semiconductor Capability.jmp", 非表示); close_dts = Expr( Try(Close(dt、保存なし)); Try(Close(dt1、保存なし)); Try(Close(dt2、保存なし)); ); change_table = Expr( cur_table = (lb << get selected)[1]; fcs << Set Data Table(cur_table); clb << Set Data Table(cur_table); ); nw = New Window("Col List Box Example", H List Box( lb = List Box(Get Data Table List(), change_table ), fcs = Filter Col Selector(Datatable(dt)), clb = Col List Box(Datatable) (dt), all, numeric, max selected(1), nlines(5), <
これにより、不要な表示ボックスが不要になり、リファレンスの変更がはるかに簡単になります。
スクリプティング