81061_zh-TW

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;