Di tanto in tanto sarebbe bello creare interfacce utente che consentano all'utente di modificare i datatables che verranno utilizzati (attualmente la mia soluzione a questo è "non" aggiungere mai l'opzione per modificare le tabelle di dati). Per quanto ne so, al momento dovrai ricreare il selettore di colonne del filtro e la casella di riepilogo delle colonne per modificare i datatable che utilizzano.
Questo è quello che penso tu debba fare:
Visualizza altro...
Ecco come vorrei che fosse fatto:
Visualizza altro...
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>
Nomi Predefinito A Qui(1); dt = Open("$SAMPLE_DATA/Probe.jmp", invisibile); dt1 = Open("$SAMPLE_DATA/Big Class.jmp", invisibile); dt2 = Open("$SAMPLE_DATA/Semiconductor Capability.jmp", invisibile); close_dts = Expr( Try(Close(dt, no save)); Try(Close(dt1, no save)); Try(Close(dt2, no save)); ); change_table = Expr( cur_table = (lb << fatti selezionare)[1]; fcs << Imposta tabella dati(cur_table); clb << Imposta tabella dati(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), <
Ciò eliminerebbe la necessità di caselle di visualizzazione non necessarie e renderebbe molto più semplice la modifica del riferimento.