administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fix pascalabcnet/pascalabcnetide#188

Browse source
This commit is contained in:
Бондарев Иван 2020-10-11 14:24:39 +02:00
parent 595bca24d6
commit b4c9dc2f0c
4 changed files with 17 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
PluginsSupport/Interfaces.cs
View file

@ -377,6 +377,7 @@ namespace VisualPascalABCPlugins
void ExecRedo();
void CollapseRegions();
void CodeFormat();
void SetEditorDisabled(bool val);
}
public interface IWorkbenchDebuggerOperationsService

2
VisualPascalABCNET/IB/Debugger/Debugger.cs
View file

@ -662,6 +662,7 @@ namespace VisualPascalABC
RemoveGotoBreakpoints();
AssemblyHelper.Unload();
CloseOldToolTip();
workbench.ServiceContainer.EditorService.SetEditorDisabled(false);
//RemoveMarker(frm.CurrentCodeFileDocument.TextEditor.ActiveTextAreaControl.Document);
evaluator = null;
parser= null;
@ -697,6 +698,7 @@ namespace VisualPascalABC
workbench.WidgetController.EnableCodeCompletionToolTips(false);
workbench.WidgetController.SetAddExprMenuVisible(true);
workbench.WidgetController.SetDisassemblyMenuVisible(true);
workbench.ServiceContainer.EditorService.SetEditorDisabled(true);
TooltipServiceManager.hideToolTip();
IsRunning = true;
evaluator = new ExpressionEvaluator(e.Process,workbench.VisualEnvironmentCompiler, FileName);

13
VisualPascalABCNET/Workbench/EditorServices.cs
View file

@ -85,6 +85,17 @@ namespace VisualPascalABC
edit.Document.HighlightingStrategy = ICSharpCode.TextEditor.Document.HighlightingManager.Manager.FindHighlighterForFile(FileName);
}
internal bool editorDisabled;
public void SetEditorDisabled(bool val)
{
this.editorDisabled = val;
if (!val)
foreach (var tab in OpenDocuments.Values)
tab.TextEditor.Document.ReadOnly = val;
CurrentCodeFileDocument.TextEditor.Document.ReadOnly = val;
}
public void SynEdit_ChangeText(object sender, CodeFileDocumentControl cfdc)
{
CodeFileDocumentControl d = cfdc;
@ -98,7 +109,7 @@ namespace VisualPascalABC
}
NavigationLocationChanged();
UpdateUndoRedoEnabled();
UpdateUndoRedoEnabled();
WorkbenchServiceFactory.CodeCompletionParserController.SetAsChanged(cfdc.FileName);
}

2
VisualPascalABCNET/Workbench/VisibilityService.cs
View file

@ -108,6 +108,8 @@ namespace VisualPascalABC
//toolStrip1.Refresh();
}
bool BottomDockContentVisible
{
get