473955_en-US

liliconcom

Need help with scripting Panel Box

I have a Panel Box with V List Box that has Combo box and two If Boxes with content of different size. Depending on Combo Box selection I show either smaller If Box or Bigger If Box.

notReadyTablesText = "Need to join tables";
readyTableText = "I have the table";
selectorOptions = Eval List( {notReadyTablesText, readyTableText} );
     
Panel Box( "Select tables",
 stVLB = V List Box(
  readyTablesSelector = Combo Box(
   selectorOptions,
   selector = readyTablesSelector << Get Selected();
   Show( selector );
   If(
    selector == notReadyTablesText,
     notReadyTables << Set( 1 );
     readyTables << Set( 0 );,
    selector == readyTableText,
     notReadyTables << Set( 0 );
     readyTables << Set( 1 );
   )
        
   ;
  ),
  notReadyTables = If Box(
   1,
   V List Box(
    Button Box( "Table 1", t1Open ),
    Button Box( "Table 2", t2Open ),
    join = Button Box( "Join Tables",
     notImplemented;
        
    )
   )
  ),
  readyTables = If Box( 0, Button Box( "Load Tables", loadTable ) )
 ) 
  
);

 

When I switch the combo box, the size of the Panel Box changes and everything that is below that Panel Box is jumping. How do I keep the same size of the Panel Box?

I tried Set Height, Set Auto Stretching, Set Min Size() etc.

ScriptingRe: Need help with scripting Panel Box

It can be a little difficult to manually set Button Box() sizes (I usually use a H Splitter  Box() and Lineup Box() to have JMP auto-size everything), but the best method I've found is to send the message <<SET min="" size="">.</SET>

 

notReadyTablesText = "Need to join tables";
readyTableText = "I have the table";
selectorOptions = Eval List( {notReadyTablesText, readyTableText} );
     
pb = Panel Box( "Select tables",
 stVLB = V List Box(
  readyTablesSelector = Combo Box(
   selectorOptions,
   selector = readyTablesSelector << Get Selected();
   Show( selector );
   If(
    selector == notReadyTablesText,
     notReadyTables << Set( 1 );
     readyTables << Set( 0 );,
    selector == readyTableText,
     notReadyTables << Set( 0 );
     readyTables << Set( 1 );
   )
        
   ;
  ),
  notReadyTables = If Box(
   1,
   V List Box(
    bb1 = Button Box( "Table 1", t1Open ),
    bb2 = Button Box( "Table 2", t2Open ),
    join = Button Box( "Join Tables",
     notImplemented;
        
    )
   )
  ),
  readyTables = If Box( 1, bb3 = Button Box( "Load Tables (really long button name)", loadTable ) )
 ) 
  
);

new window( "test",
 pb
);

boxes = {bb1, bb2, bb3, join};

max size =  Max( {readytables, notReadyTables} << Get Width );
boxes << Set Min Size( max size, 25 ) << set Max Size( max size, 25 );
readyTables << Set( 0 );

Re: Need help with scripting Panel Box

Here is an example of using H Splitter Box() and Lineup Box() to do this.  Note that this also scopes everything into an anonymous namespace to prevent cross-talk if multiple windows are opened at the same time from this script.

 

Names Default to Here( 1 );

self = New Namespace();

self:notReadyTablesText = "Need to join tables";
self:readyTableText = "I have the table";
self:selectorOptions = Eval List( {self:notReadyTablesText, self:readyTableText} );

Eval( Eval Expr(
self:button generator = Function( {title, callback},
 {Default Local},
 self = Namespace( Expr( self << Get Name ) );
 Eval( Parse( Eval Insert( JSL Quote(
 box = Button Box( title, <<SET function=""></SET>

Re: Need help with scripting Panel Box

I'm talking about size in X, I'm talking about size in Y.

In your example the height of the Panel Box is changing.

This:

vs. this:

 

I have other panel boxes below this one - and they start jumping.

Anyways, I gave up and implemented it as a Line Up Box for now.