Grid Control in JMP Dialog Boxes?

pmroz

Hi folks,

Has anyone figured out how to do some sort of grid control in JMP dialog boxes?  Something similar to SCgrid in VB?  I want to display a scrollable table with clickable controls in it.

Thanks,

Peter

ms

Just action_list[1] works but not the entire list. Thus, Col Box() seems unable to resolve a List of display boxes which usually means that one has to make and parse an enormous expression string.

dt = open("$sample_data\Car Physical Data.jmp");

current data table(dt);

model_list   = :Model << get values;

Country_list = :Country << get values;

type_list    = :Type << get values;

weight_list  = :Weight << get values;

turn_list    = :Turning Circle << get values;

disp_list    = :Displacement << get values;

horse_list   = :Horsepower << get values;

gas_list     = :Gas Tank Size << get values;

bb_text="button box(\!"Open\!", print(1))";;

for (i = 2, i <= nrows(dt), i++,

      bb_text = bb_text||", "||char(substitute(nameexpr(button box("Open", print(expr(i)))),expr(i),i));    

);

col_box="col box(\!"Action\!", "||bb_text||")" ;

New Window( "Cars",

      tb = Table Box(

                 eval(parse(col_box)),

                  String Col Box("Model", model_list),

                  String Col Box("Country", country_list),

                  String Col Box("Type", type_list),

                  Number Col Box("Weight", weight_list ),

                  Plot Col Box( "", weight_list),

                  Number Col Box("Turning Circle", turn_list ),

                  Number Col Box("Displacement", disp_list ),

                  Number Col Box("Horsepower", horse_list ),

                  Number Col Box("Gas Tank Size", gas_list ),

                  Plot Col Box( "", gas_list),

      )

);

tb << Set Scrollable( 25, 0 );

tb << table style(beveled);