85 lines
3.7 KiB
C#
85 lines
3.7 KiB
C#
|
/*
|
||
|
|
Copyright (C) 2014-2019 de4dot@gmail.com
|
||
|
|
|
||
|
|
This file is part of dnSpy
|
||
|
|
|
||
|
|
dnSpy is free software: you can redistribute it and/or modify
|
||
|
|
it under the terms of the GNU General Public License as published by
|
||
|
|
the Free Software Foundation, either version 3 of the License, or
|
||
|
|
(at your option) any later version.
|
||
|
|
|
||
|
|
dnSpy is distributed in the hope that it will be useful,
|
||
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
GNU General Public License for more details.
|
||
|
|
|
||
|
|
You should have received a copy of the GNU General Public License
|
||
|
|
along with dnSpy. If not, see <http://www.gnu.org/licenses/>.
|
||
|
|
*/
|
||
|
|
|
||
|
|
using System;
|
||
|
|
using System.Collections.Generic;
|
||
|
|
using System.ComponentModel.Composition;
|
||
|
|
using System.Windows.Input;
|
||
|
|
using dnSpy.Contracts.Controls;
|
||
|
|
using dnSpy.Contracts.Extension;
|
||
|
|
using dnSpy.Contracts.Images;
|
||
|
|
using dnSpy.Contracts.Menus;
|
||
|
|
using dnSpy.Contracts.ToolWindows.App;
|
||
|
|
using dnSpy.Scripting.Roslyn.Common;
|
||
|
|
using dnSpy.Scripting.Roslyn.Properties;
|
||
|
|
|
||
|
|
namespace dnSpy.Scripting.Roslyn.VisualBasic {
|
||
|
|
[Export(typeof(IToolWindowContentProvider))]
|
||
|
|
sealed class VisualBasicToolWindowContentProvider : ScriptToolWindowContentProvider {
|
||
|
|
readonly Lazy<IVisualBasicContent> visualBasicContent;
|
||
|
|
|
||
|
|
[ImportingConstructor]
|
||
|
|
VisualBasicToolWindowContentProvider(Lazy<IVisualBasicContent> visualBasicContent)
|
||
|
|
: base(VisualBasicToolWindowContent.THE_GUID) {
|
||
|
|
this.visualBasicContent = visualBasicContent;
|
||
|
|
}
|
||
|
|
|
||
|
|
public override IEnumerable<ToolWindowContentInfo> ContentInfos {
|
||
|
|
get { yield return new ToolWindowContentInfo(VisualBasicToolWindowContent.THE_GUID, VisualBasicToolWindowContent.DEFAULT_LOCATION, AppToolWindowConstants.DEFAULT_CONTENT_ORDER_BOTTOM_SCRIPTING_VISUALBASIC, false); }
|
||
|
|
}
|
||
|
|
|
||
|
|
protected override ScriptToolWindowContent CreateContent() => new VisualBasicToolWindowContent(visualBasicContent);
|
||
|
|
}
|
||
|
|
|
||
|
|
sealed class VisualBasicToolWindowContent : ScriptToolWindowContent {
|
||
|
|
public static readonly Guid THE_GUID = new Guid("C0D88168-7750-4B15-AE72-215BFE214DA5");
|
||
|
|
public const AppToolWindowLocation DEFAULT_LOCATION = AppToolWindowLocation.DefaultHorizontal;
|
||
|
|
|
||
|
|
public override string Title => dnSpy_Scripting_Roslyn_Resources.Window_VisualBasic;
|
||
|
|
protected override IScriptContent ScriptContent => visualBasicContent.Value;
|
||
|
|
readonly Lazy<IVisualBasicContent> visualBasicContent;
|
||
|
|
|
||
|
|
public VisualBasicToolWindowContent(Lazy<IVisualBasicContent> visualBasicContent)
|
||
|
|
: base(THE_GUID) {
|
||
|
|
this.visualBasicContent = visualBasicContent;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
[ExportAutoLoaded]
|
||
|
|
sealed class ShowVisualBasicInteractiveCommandLoader : IAutoLoaded {
|
||
|
|
public static readonly RoutedCommand ShowVisualBasicInteractiveRoutedCommand = new RoutedCommand("ShowVisualBasicInteractiveRoutedCommand", typeof(ShowVisualBasicInteractiveCommandLoader));
|
||
|
|
|
||
|
|
[ImportingConstructor]
|
||
|
|
ShowVisualBasicInteractiveCommandLoader(IWpfCommandService wpfCommandService, IDsToolWindowService toolWindowService) {
|
||
|
|
var cmds = wpfCommandService.GetCommands(ControlConstants.GUID_MAINWINDOW);
|
||
|
|
cmds.Add(ShowVisualBasicInteractiveRoutedCommand,
|
||
|
|
(s, e) => toolWindowService.Show(VisualBasicToolWindowContent.THE_GUID),
|
||
|
|
(s, e) => e.CanExecute = true);
|
||
|
|
cmds.Add(ShowVisualBasicInteractiveRoutedCommand, ModifierKeys.Control | ModifierKeys.Alt, Key.I);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
[ExportMenuItem(OwnerGuid = MenuConstants.APP_MENU_VIEW_GUID, Header = "res:Window_VisualBasic", InputGestureText = "res:ShortCutKeyCtrlAltI", Icon = DsImagesAttribute.VBInteractiveWindow, Group = MenuConstants.GROUP_APP_MENU_VIEW_WINDOWS, Order = 40)]
|
||
|
|
sealed class ShowVisualBasicInteractiveCommand : MenuItemCommand {
|
||
|
|
ShowVisualBasicInteractiveCommand()
|
||
|
|
: base(ShowVisualBasicInteractiveCommandLoader.ShowVisualBasicInteractiveRoutedCommand) {
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|