473326_zh-TW

liliconcom

添加選項以更改 col 列錶框/過濾器 col 選擇器數據表

不時構建允許用戶更改將使用的數據表的用戶界面會很好（目前我對此的解決方案是“從不”添加選項來更改數據表）。 據我所知，您目前必須重新創建過濾器 col 選擇器和 col 列錶框來更改它們使用的數據表。

 

這就是我認為你必須做的：

查看更多...

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];
  
 // this wont work on filter col box due to ifbox created by it
 clb << Delete Box();
 vlb_clb << Append(clb = Col List Box(Datatable(cur_table), all, numeric, max selected(1), nlines(5), <<MODELING type=""></MODELING>

這就是我希望它完成的方式：

查看更多...

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>

這將消除對不必要的顯示框的需要，並使參考更改更加簡單。

腳本