public void ExecuteSourceLocationAction(PascalABCCompiler.SourceLocation SourceLocation,SourceLocationAction Action) { ExecuteSLAction(SourceLocation,Action); }
void LoadOptions(string FileName) { try { if (!File.Exists(FileName)) { PascalABCCompiler.StringResourcesLanguage.CurrentLanguageName = "Русский"; return; } Hashtable Options = new Hashtable(StringComparer.CurrentCultureIgnoreCase); PascalABCCompiler.StringResources.ReadStringsFromStream(new StreamReader(FileName, System.Text.Encoding.GetEncoding(1251)), Options); string value; int val; if ((value = (string)Options[OptionsItemNameWorkDirectory]) != null) WorkingDirectory = value; if ((value = (string)Options[OptionsItemNameLanguage]) != null) PascalABCCompiler.StringResourcesLanguage.CurrentLanguageName = value; if ((value = (string)Options[OptionsItemNameMainFormLeft]) != null) { val = Convert.ToInt32(value); if (val < Screen.PrimaryScreen.WorkingArea.Size.Width && val >= 0) FormLeft = this.Left = val; } if ((value = (string)Options[OptionsItemNameMainFormTop]) != null) { val = Convert.ToInt32(value); if (val < Screen.PrimaryScreen.WorkingArea.Size.Height && val >= 0) FormTop = this.Top = val; } if ((value = (string)Options[OptionsItemNameMainFormWidth]) != null) { val = Convert.ToInt32(value); if (val < Screen.PrimaryScreen.WorkingArea.Size.Width && val >= 100) FormWidth = this.Width = val; } if ((value = (string)Options[OptionsItemNameMainFormHeight]) != null) { val = Convert.ToInt32(value); if (val < Screen.PrimaryScreen.WorkingArea.Size.Height && val >= 100) FormHeight = this.Height = val; } if ((value = (string)Options[OptionsItemNameMainFormMaximized]) != null) if (Convert.ToBoolean(value)) this.WindowState = FormWindowState.Maximized; if ((value = (string)Options[OptionsItemNameShowLinesNum]) != null) UserOptions.ShowLineNums = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameDeleteEXEAfterExecute]) != null) UserOptions.DeleteEXEAfterExecute = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameDeletePDBAfterExecute]) != null) UserOptions.DeletePDBAfterExecute = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameShowMathBracket]) != null) UserOptions.ShowMathBraket = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameEditorFontSize]) != null) UserOptions.EditorFontSize = Convert.ToInt32(value); if ((value = (string)Options[OptionsItemNameErrorsStrategy]) != null) ErrorsManager.Strategy = (PascalABCCompiler.Errors.ErrorsStrategy)Convert.ToByte(value); if ((value = (string)Options[OptionsItemNameErrorsCursorPosStrategy]) != null) ErrorCursorPosStrategy = (VisualPascalABCPlugins.SourceLocationAction)Convert.ToByte(value); if ((value = (string)Options[OptionsItemNameShowOutputWindow]) != null) BottomTabsVisible = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameRedirectConsoleIO]) != null) UserOptions.RedirectConsoleIO = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameConvertTabsToSpaces]) != null) UserOptions.ConverTabsToSpaces = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameGenerateDebugInfo]) != null) CompilerOptions1.Debug = Convert.ToBoolean(value); if ((value = (string)Options[OptionsItemNameTabIdent]) != null) UserOptions.TabIndent = Convert.ToInt32(value); int i = 0; while ((value = (string)Options[OptionsItemNameLastFile + (i++).ToString()]) != null) AddLastFile(value); } catch (Exception) { } }
public void ExecuteSourceLocationAction(PascalABCCompiler.SourceLocation SourceLocation, SourceLocationAction Action) { ExecuteSLAction(SourceLocation, Action); }