Adds Copy button to Code Explorer, allows copy of *all* User Declarations

WIP...

Author: ThunderFrame

RetailCoder.VBE/Navigation/CodeExplorer/CodeExplorerViewModel.cs

@@ -1,9 +1,13 @@
 using System;
 using System.Collections.Generic;
 using System.Collections.ObjectModel;
+using System.Globalization;
+using System.IO;
 using System.Linq;
+using System.Windows;
 using System.Windows.Input;
 using Microsoft.Vbe.Interop;
+using Rubberduck.Common;
 using Rubberduck.Navigation.Folders;
 using Rubberduck.Parsing.Annotations;
 using Rubberduck.Parsing.Symbols;
@@ -22,6 +26,7 @@ public sealed class CodeExplorerViewModel : ViewModelBase, IDisposable
     {
         private readonly FolderHelper _folderHelper;
         private readonly RubberduckParserState _state;
+        private readonly IClipboardWriter _clipboard;
 
         public CodeExplorerViewModel(FolderHelper folderHelper, RubberduckParserState state, List<ICommand> commands)
         {
@@ -30,6 +35,8 @@ public CodeExplorerViewModel(FolderHelper folderHelper, RubberduckParserState st
             _state.StateChanged += ParserState_StateChanged;
             _state.ModuleStateChanged += ParserState_ModuleStateChanged;
 
+            _clipboard = new ClipboardWriter();
+
             _refreshCommand = commands.OfType<CodeExplorer_RefreshCommand>().FirstOrDefault();
             _refreshComponentCommand = commands.OfType<CodeExplorer_RefreshComponentCommand>().FirstOrDefault();
             _navigateCommand = commands.OfType<CodeExplorer_NavigateCommand>().FirstOrDefault();
@@ -59,6 +66,38 @@ public CodeExplorerViewModel(FolderHelper folderHelper, RubberduckParserState st
             _commitCommand = commands.OfType<CodeExplorer_CommitCommand>().FirstOrDefault();
             _undoCommand = commands.OfType<CodeExplorer_UndoCommand>().FirstOrDefault();
 
+            //_copyResultsCommand = commands.OfType<CodeExplorer_CopyResultsCommand>().FirstOrDefault();
+
+            _copyResultsCommand = new DelegateCommand(param =>
+            {
+                const string XML_SPREADSHEET_DATA_FORMAT = "XML Spreadsheet";
+
+                ColumnInfo[] ColumnInfos = { new ColumnInfo("Project"), new ColumnInfo("Folder"), new ColumnInfo("Component"), new ColumnInfo("Declaration Type"), new ColumnInfo("Scope"), 
+                                           new ColumnInfo("Name"), new ColumnInfo("Return Type") };
+
+                // this.ProjectName, this.CustomFolder, this.ComponentName, this.DeclarationType.ToString(), this.Scope 
+                var aDeclarations = _state.AllUserDeclarations.Select(declaration => declaration.ToArray()).ToArray();
+
+                var resource = "Rubberduck User Declarations - {0}";
+                var title = string.Format(resource, DateTime.Now.ToString(CultureInfo.InvariantCulture));
+
+                //var textResults = title + Environment.NewLine + string.Join("", _results.Select(result => result.ToString() + Environment.NewLine).ToArray());
+                var csvResults = ExportFormatter.Csv(aDeclarations, title, ColumnInfos);
+                var htmlResults = ExportFormatter.HtmlClipboardFragment(aDeclarations, title, ColumnInfos);
+                var rtfResults = ExportFormatter.RTF(aDeclarations, title);
+
+                MemoryStream strm1 = ExportFormatter.XmlSpreadsheetNew(aDeclarations, title, ColumnInfos);
+                //Add the formats from richest formatting to least formatting
+                _clipboard.AppendStream(DataFormats.GetDataFormat(XML_SPREADSHEET_DATA_FORMAT).Name, strm1);
+                _clipboard.AppendString(DataFormats.Rtf, rtfResults);
+                _clipboard.AppendString(DataFormats.Html, htmlResults);
+                _clipboard.AppendString(DataFormats.CommaSeparatedValue, csvResults);
+                //_clipboard.AppendString(DataFormats.UnicodeText, textResults);
+
+                _clipboard.Flush();
+            
+            });
+
             _setNameSortCommand = new DelegateCommand(param =>
             {
                 SortByName = (bool)param;
@@ -126,6 +165,9 @@ public bool SortBySelection
             }
         }
 
+        private readonly ICommand _copyResultsCommand;
+        public ICommand CopyResultsCommand { get { return _copyResultsCommand; } }
+
         private readonly ICommand _setNameSortCommand;
         public ICommand SetNameSortCommand { get { return _setNameSortCommand; } }
 

RetailCoder.VBE/UI/CodeExplorer/CodeExplorerControl.xaml

@@ -701,13 +701,24 @@
                         <TextBlock Text="{Resx ResxName=Rubberduck.UI.RubberduckUI, Key=CodeExplorer_ShowDesignerToolTip}" />
                     </Button.ToolTip>
                 </Button>
+
+                <Separator />
+                
+                <Button Command="{Binding CopyResultsCommand}">
+                    <Image Height="16" Source="../../Resources/document-copy.png" />
+                    <Button.ToolTip>
+                        <TextBlock Text="{Resx ResxName=Rubberduck.UI.RubberduckUI, Key=CodeExplorer_CopyToolTip}" />
+                    </Button.ToolTip>
+                </Button>
+
             </ToolBar>
         </ToolBarTray>
 
         <TreeView Grid.Row="1"
                   ItemContainerStyle="{StaticResource ShinyTreeView}"
                   HorizontalContentAlignment="Stretch"
                   MouseDoubleClick="TreeView_OnMouseDoubleClick"
+                  Style="{StaticResource CodeExplorerTreeViewStyle}" BorderThickness="0,1">
             <i:Interaction.Behaviors>
                 <controls:BindableSelectedItemBehavior SelectedItem="{Binding SelectedItem, Mode=TwoWay}" />
             </i:Interaction.Behaviors>

RetailCoder.VBE/UI/RubberduckUI.Designer.cs

@@ -562,6 +562,9 @@ Warning: All customized settings will be lost.  Your old file will be saved in '
   <data name="CodeExplorer_ShowFoldersToolTip" xml:space="preserve">
     <value>Toggle folders</value>
   </data>
+  <data name="CodeExplorer_CopyToolTip" xml:space="preserve">
+    <value>Copy to clipboard</value>
+  </data>
   <data name="CodeInspections_CopyToolTip" xml:space="preserve">
     <value>Copy inspection results to clipboard</value>
   </data>

RetailCoder.VBE/UI/RubberduckUI.resx

@@ -405,6 +405,12 @@ public string ProjectName
             }
         }
 
+        public object[] ToArray()
+        {
+            return new object[] { this.ProjectName, this.CustomFolder, this.ComponentName, this.DeclarationType.ToString(), this.Scope, this.IdentifierName, this.AsTypeName };
+        }
+
+
         /// <summary>
         /// Gets the name of the VBComponent the declaration is made in.
         /// </summary>