टैब्ड मैथमैटिका नोटबुक कैसे बनाएं

Question

क्या टैबबंद इंटरफ़ेस में नोटबुक (कोशिकाओं के अनुक्रम) बनाने और संपादित करने का कोई तरीका है? क्या ऐसा इंटरफेस TabView या कुछ अन्य टूल के साथ बनाया जा सकता है? मुझे लगता है कि अगर मैं स्क्रैच से फ्रंट-एंड बना देता हूं तो यह संभव होगा, लेकिन मानक वोल्फ्राम फ्रंट एंड के भीतर कोई रास्ता है?

---

दो चीजें मुझे यह पूछने के लिए प्रेरित करती हैं। सबसे पहले, मैं गणित नोटबुक के साथ माइक्रोसॉफ्ट ऑफिस वनोट के लिए एक प्रतिस्थापन बनाना चाहता हूं। दूसरा, जब मैं गणित में काम कर रहा हूं, तो मुझे लगता है कि एक टैबबंद इंटरफ़ेस कई अलग-अलग खिड़कियां खोलने से बेहतर काम करेगा या नहीं।

Answer 1

जबकि मैथमैटिका सीधे टैबड नोटबुक विंडो का समर्थन नहीं करता है, तो DockedCells का उपयोग करके प्रभाव का पुन: उत्पन्न करना संभव है। वर्चुअल बुक/फंक्शन नेविगेटर इंटरफेस (हेल्प मेन्यू से) यह करता है ... यह अनिवार्य रूप से एक स्लाइड शो है जिसमें दो स्लाइड्स हैं, एक वीबी धारण करता है और दूसरा एफएन युक्त होता है, जिसमें DockedCells नेविगेशन इंटरफ़ेस NotebookFind द्वारा संचालित होता है जो थोड़ा सा दिखता है टैब की तरह।

यहां बताया गया है कि आप इस तरह की नोटबुक बनाने के बारे में कैसे जा सकते हैं। क्षमा करें, यहां कुछ प्रकार की उन्नत अवधारणाएं हैं ... यदि इस समाधान के कोई भी भाग हैं जिनके बारे में आप और जानना चाहते हैं, तो शायद आप अधिक प्रश्नों को दूर कर सकते हैं।

(* 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] करने के लिए। टिप्पणियों में चर्चा देखें। कोड के दो बिट्स सिद्धांत रूप में समकक्ष होना चाहिए, लेकिन गणित 8 में एक बग उन्हें कभी-कभी अलग-अलग व्यवहार करने लगता है।