524150_it-IT

liliconcom

JMP > JSL > Journal > Come identificare gli elementi compressi rispetto a quelli espansi?

Ciao Comunità JMP,

Desidero estrarre elementi da un giornale di registrazione esistente in base al loro stato Compresso/Espanso. Ho provato a utilizzare il metodo "Root << è compresso (nodo)" ma restituisce un valore vuoto indipendentemente dallo stato di Collapsed/Expanded (vedi JSL lavori in corso sotto).

(JMP 16.1, Windows 10 Pro)

Domande:

1. Il metodo "<< is Collapsed" è applicabile alle strutture del journal?
2. In tal caso, qual è il suo uso corretto, in particolare per quanto riguarda le definizioni di "radice" e "nodo"?
3. In caso contrario, quale alternativa potrei utilizzare per restituire lo stato compresso di un elemento del diario?

Names Default to Here (1);

winlist = Window () << Get Window Title ();

For( i = N Items( winlist ), i > 0, i--,
 If( (Window( winlist[i] ) << Window Class Name) != "Journal",
  Remove From( winlist, i )
 )
);

If (N items (winlist) == 0, New Window ("ERROR", Text Box ("!!!! NO JOURNAL CURRENTLY OPENED !!!!")); throw (1));

dw = New Window (" PICK A JOURNAL ",
 << MODAL,
 V List Box ( 
  Text Box (" SELECT A JOURNAL"),
  wl = List Box ( winlist,
      Width (500),
      Max Selected (1),
      nlines (10)
      ),
  
  Text Box (" Enter number of plots per row"),
  nbe = Number Edit Box (5), 
  
  Text Box (" REMOVE LEGEND? "),
  rb = Radio Box( {"YES", "NO"}), 
  
  Text Box (" PLOT ONLY EXPANDED? "),
  rb2 = Radio Box( {"YES", "NO"}),   
  
  Button Box ("OK", jrn_l = (wl << get selected); npr = nbe << get (); lg_x = rb << get (); ex_x = rb2 << get (); switch = 1),
  
  Button Box ("CANCEL", switch = 0; Throw(1))   
  ),
  

 
 );


show (jrn_l);
show (npr);
show (lg_x);
show (ex_x);

If (switch == 0, Throw (1));

jrn = Get Window (jrn_l [1]);

show (jrn);

nplot = N Items (jrn << Xpath ("//OutlineBox"));

dummy = Lineup Box(N Col (1));
win = New window ("PLOTS",
 mybox = Lineup Box (N Col (npr))
);

For (i = 1, i<= nplot, i++,
 collp = jrn << is collapsed (OutlineBox (i));
 show (collp);
 if (collp == 1, 
   dummy = Lineup Box(N Col (1));
   Plot = jrn [PictureBox (i)];
   dummy << Append (Plot);
   if(lg_x == 1, 
    zzz = Dummy << Xpath ("//LegendBox");
    zzz << delete
      ); 
   mybox << Append (Dummy)
  ) 
 
);

Grazie.

 

Migliore,

 

TS

GraficaSceneggiatura