タブ付きMathematicaノートブックの作成方法

Question

タブ付きインターフェースでノートブック（セルのシーケンス）を作成し編集する方法はありますか？そのようなインターフェイスはTabViewまたは他のツールで作成できますか？フロントエンドを最初から作成した場合、これが可能だと仮定していますが、標準のWolframフロントエンドには方法がありますか？

---

2つのことが私にこれを求めます。まず、MathematicaノートブックでMicrosoft Office OneNoteの代替品を作りたいと思います。第二に、私がMathematicaで働いているときに、タブ付きのインターフェースが、多数の別々のウィンドウを開いているよりもうまくいくかどうか疑問に思います。

Answer 1

Mathematicaはタブ付きノートブックウィンドウを直接サポートしていませんが、DockedCellsを使って効果を再現することは可能です。 Virtual Book/Function Navigatorのインターフェース（ヘルプメニューから）はこれを行います。本質的に2つのスライドを持つスライドショーです.1つはVBを保持し、もう1つはFNを含み、タブのようなもの。

ここに、ノートブックを自分で作成する方法の要点があります。申し訳ありませんが、ここにいくつかの先進的な概念があります。詳細について知りたいこのソリューションの部分がある場合、多分より多くの質問をスピンさせることができます。

(* make a single page of the notebook *) 
page[tag_String] := 
    Cell@CellGroupData[{Cell["", "SlideShowNavigationBar", 
     CellTags -> {tag}], Cell[tag, "Title"]}]; 
(* make a single tab-like button which selects the page *) 
button[tag_String] := 
    Button[Dynamic[ 
    Setter[Dynamic[ 
     CurrentValue[EvaluationNotebook[], {TaggingRules, "page"}, 
     tag]], tag]], 
    CurrentValue[EvaluationNotebook[], {TaggingRules, "page"}] = tag; 
    NotebookLocate[tag], 
    Appearance -> None]; 
(* make a notebook based upon a list of strings which are names of tabs *) 
makeTabbedNotebook[nameList_List] := 
    NotebookPut@Notebook[page /@ nameList, 
    DockedCells -> 
    ToBoxes[ExpressionCell[Row[button /@ nameList], 
     "DockedCell"]][[1]], 
    ScreenStyleEnvironment -> "SlideShow"]; 

makeTabbedNotebook[{"First", "Second", "Third"}] 

編集：NotebookFind[ButtonNotebook[],tag,All,CellTags]を変更し、常にNotebookLocate[tag]に、正しくスライドショーをスクロールしないように見えます。コメントの議論を参照してください。 2つのコードは理論上は同等であるべきですが、Mathematica 8のバグは時々異なった動作をするように見えます。