Exemplo n.º 1
0
 private void AddDebugPage(CodeFileDocumentControl tp)
 {
     if (TabStack.Count > 0 && !TabStack.Contains(tp))
     {
         CodeFileDocumentControl cfdc = TabStack[TabStack.Count - 1];
         //TabStack.RemoveAt(TabStack.Count-1);
         RichTextBox tb = null;
         if (OutputTextBoxs.ContainsKey(cfdc))
         {
             tb = OutputTextBoxs[cfdc];
             RichTextBox new_tb = OutputTextBoxs[tp];
             new_tb.Text = tb.Text;
         }
         OutputWindow.OutputTextBoxScrolToEnd();
     }
     if (!TabStack.Contains(tp))
     {
         TabStack.Add(tp);
         OutputBoxStack.Add(OutputTextBoxs[tp]);
     }
     if (DebugTabs[tp] != null)
     {
         return;
     }
     DebugTabs[tp] = tp.TextEditor.ActiveTextAreaControl.TextArea;
     TextAreaHelper.TextAreas[tp.TextEditor.ActiveTextAreaControl.TextArea] = tp.FileName;
     tp.TextEditor.ActiveTextAreaControl.TextArea.ToolTipRequest           += WorkbenchServiceFactory.DebuggerManager.TextAreaToolTipRequest;
 }
Exemplo n.º 2
0
 bool VisualPascalABCPlugins.IWorkbenchDocumentService.ContainsTab(VisualPascalABCPlugins.ICodeFileDocument tab)
 {
     return(TabStack.Contains(tab as CodeFileDocumentControl));
 }