81061_zh-CN

liliconcom

如何折叠标签页中的大纲框

大家好，我对jsl编程很陌生，想问一下，如何折叠标签页中的大纲框？

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );


win = New Window( "Tab Box",
 tb = Tab Box(
  Tab Page Box( // tab contents
   Title( "First Step" ),
    OutlineBox( "Summary", dt <<Distribution( Column( :Height, :Weight ), By( :sex ))),
    OutlineBox( "Pareto plot", dt <<Distribution( Column( :Height, :Weight ), By( :sex )) ),
     OutlineBox( "Control chart", dt <<Distribution( Column( :Height, :Weight ), By( :sex )) ),
   
  ),
  Tab Page Box( // tab contents
   Title( "Second Step" ),
    OutlineBox( "Summary", dt <<Distribution( Column( :Height, :Weight ), By( :sex )) ),
    OutlineBox( "Pareto plot", dt <<Distribution( Column( :Height, :Weight ), By( :sex )) ),
     OutlineBox( "Control chart", dt <<Distribution( Column( :Height, :Weight ), By( :sex )) ),
   
   
  )
 )
);

 

回复：如何折叠标签页中的大纲框

您还可以使用内联消息：

 

Outline Box( "Summary",
 dt << Distribution( Column( :Height, :Weight ), By( :sex ) ),
 <<CLOSE></CLOSE>

回复：如何折叠标签页中的大纲框

您可以设置指向 Outline Box() 的指针并单独关闭它们，或者使用 XPath() 找到所有它们并对所有 Outline Box() 一起进行操作....见下文

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );


win = New Window( "Tab Box",
 tb = Tab Box(
  Tab Page Box( // tab contents
   Title( "First Step" ),
    ob1=OutlineBox( "Summary", dt <<DISTRIBUTION></DISTRIBUTION>

回复：如何折叠标签页中的大纲框

今天早上刚刚发现并使用了这个解决方案以及在脚本中创建的日记 - 仍然效果很好！

想要补充一点（至少在期刊上下文中）使用上面的 XPath 方法也会关闭所有子大纲框 - 即，它的作用类似于“关闭所有下面”而不仅仅是“关闭”。

我必须添加下面的行以随后“静默”打开关联的子大纲框，以便父大纲框最初全部折叠，但当您切换各个父大纲框时，子大纲框立即可见。

(win << XPath( "//OutlineBox//OutlineBox" )) << Open All Below;