_ Partial Class Settings Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Me.Label1 = New System.Windows.Forms.Label() Me.BaseDirBox = New System.Windows.Forms.TextBox() Me.Button1 = New System.Windows.Forms.Button() Me.SidebarCheckbox = New System.Windows.Forms.CheckBox() Me.DirectoryPicker = New System.Windows.Forms.FolderBrowserDialog() Me.Button2 = New System.Windows.Forms.Button() Me.SaveButton = New System.Windows.Forms.Button() Me.Label2 = New System.Windows.Forms.Label() Me.UndoStepLimit = New System.Windows.Forms.NumericUpDown() Me.Label3 = New System.Windows.Forms.Label() Me.UnlimitedUndosCheckbox = New System.Windows.Forms.CheckBox() Me.UndoMemoryLimitCheckbox = New System.Windows.Forms.CheckBox() Me.UndoMemoryLimitCount = New System.Windows.Forms.NumericUpDown() Me.GroupBox1 = New System.Windows.Forms.GroupBox() Me.Label4 = New System.Windows.Forms.Label() Me.Button4 = New System.Windows.Forms.Button() Me.Label5 = New System.Windows.Forms.Label() Me.TransparencyCheckbox = New System.Windows.Forms.CheckBox() Me.Label6 = New System.Windows.Forms.Label() Me.EncodingDropdown = New System.Windows.Forms.ComboBox() Me.GreenNotificationsCheckbox = New System.Windows.Forms.CheckBox() Me.setCustomColours = New System.Windows.Forms.Button() Me.DefaultButton = New System.Windows.Forms.Button() Me.Button5 = New System.Windows.Forms.Button() Me.ToolTipSlut = New System.Windows.Forms.ToolTip(Me.components) Me.DefaultTheme = New System.Windows.Forms.ComboBox() Me.Button7 = New System.Windows.Forms.Button() Me.RecycleBinCheckbox = New System.Windows.Forms.CheckBox() Me.Label7 = New System.Windows.Forms.Label() Me.Button6 = New System.Windows.Forms.Button() Me.Button3 = New System.Windows.Forms.Button() CType(Me.UndoStepLimit, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.UndoMemoryLimitCount, System.ComponentModel.ISupportInitialize).BeginInit() Me.GroupBox1.SuspendLayout() Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(13, 14) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(101, 17) Me.Label1.TabIndex = 0 Me.Label1.Text = "Base Directory" ' 'BaseDirBox ' Me.BaseDirBox.Location = New System.Drawing.Point(16, 33) Me.BaseDirBox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.BaseDirBox.Name = "BaseDirBox" Me.BaseDirBox.Size = New System.Drawing.Size(275, 22) Me.BaseDirBox.TabIndex = 1 Me.BaseDirBox.Text = "*shrugs*" Me.ToolTipSlut.SetToolTip(Me.BaseDirBox, "Which folder does Notepad Ultra look for files in?") ' 'Button1 ' Me.Button1.Location = New System.Drawing.Point(419, 32) Me.Button1.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(39, 26) Me.Button1.TabIndex = 2 Me.Button1.Text = "..." Me.ToolTipSlut.SetToolTip(Me.Button1, "Open a folder browser to pick a new base directory.") Me.Button1.UseVisualStyleBackColor = True ' 'SidebarCheckbox ' Me.SidebarCheckbox.AutoSize = True Me.SidebarCheckbox.Location = New System.Drawing.Point(16, 114) Me.SidebarCheckbox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.SidebarCheckbox.Name = "SidebarCheckbox" Me.SidebarCheckbox.Size = New System.Drawing.Size(79, 21) Me.SidebarCheckbox.TabIndex = 3 Me.SidebarCheckbox.Text = "Sidebar" Me.ToolTipSlut.SetToolTip(Me.SidebarCheckbox, "Display the sidebar? This can be toggled with F6.") Me.SidebarCheckbox.UseVisualStyleBackColor = True ' 'Button2 ' Me.Button2.Location = New System.Drawing.Point(20, 341) Me.Button2.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(75, 23) Me.Button2.TabIndex = 4 Me.Button2.Text = "Cancel" Me.Button2.UseVisualStyleBackColor = True ' 'SaveButton ' Me.SaveButton.Location = New System.Drawing.Point(383, 341) Me.SaveButton.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.SaveButton.Name = "SaveButton" Me.SaveButton.Size = New System.Drawing.Size(75, 23) Me.SaveButton.TabIndex = 5 Me.SaveButton.Text = "Save" Me.SaveButton.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(17, 23) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(76, 17) Me.Label2.TabIndex = 6 Me.Label2.Text = "Allow up to" ' 'UndoStepLimit ' Me.UndoStepLimit.Location = New System.Drawing.Point(93, 21) Me.UndoStepLimit.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.UndoStepLimit.Maximum = New Decimal(New Integer() {500, 0, 0, 0}) Me.UndoStepLimit.Name = "UndoStepLimit" Me.UndoStepLimit.Size = New System.Drawing.Size(48, 22) Me.UndoStepLimit.TabIndex = 7 Me.ToolTipSlut.SetToolTip(Me.UndoStepLimit, "The number of times you can undo before ""running out""." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Setting this to 0 will di" & "sable the Undo feature.") ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Location = New System.Drawing.Point(141, 23) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(47, 17) Me.Label3.TabIndex = 6 Me.Label3.Text = "undos" ' 'UnlimitedUndosCheckbox ' Me.UnlimitedUndosCheckbox.AutoSize = True Me.UnlimitedUndosCheckbox.Location = New System.Drawing.Point(193, 23) Me.UnlimitedUndosCheckbox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.UnlimitedUndosCheckbox.Name = "UnlimitedUndosCheckbox" Me.UnlimitedUndosCheckbox.Size = New System.Drawing.Size(88, 21) Me.UnlimitedUndosCheckbox.TabIndex = 8 Me.UnlimitedUndosCheckbox.Text = "Unlimited" Me.ToolTipSlut.SetToolTip(Me.UnlimitedUndosCheckbox, "Allow infinite undo steps! Definitely NOT RECOMMENDED." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "May eventually cause a cr" & "ash!" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Only for those who've gone mad with power.") Me.UnlimitedUndosCheckbox.UseVisualStyleBackColor = True ' 'UndoMemoryLimitCheckbox ' Me.UndoMemoryLimitCheckbox.AutoSize = True Me.UndoMemoryLimitCheckbox.Checked = True Me.UndoMemoryLimitCheckbox.CheckState = System.Windows.Forms.CheckState.Checked Me.UndoMemoryLimitCheckbox.Location = New System.Drawing.Point(20, 50) Me.UndoMemoryLimitCheckbox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.UndoMemoryLimitCheckbox.Name = "UndoMemoryLimitCheckbox" Me.UndoMemoryLimitCheckbox.Size = New System.Drawing.Size(203, 21) Me.UndoMemoryLimitCheckbox.TabIndex = 9 Me.UndoMemoryLimitCheckbox.Text = "Limit memory used by undo" Me.UndoMemoryLimitCheckbox.UseVisualStyleBackColor = True ' 'UndoMemoryLimitCount ' Me.UndoMemoryLimitCount.Location = New System.Drawing.Point(48, 78) Me.UndoMemoryLimitCount.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.UndoMemoryLimitCount.Maximum = New Decimal(New Integer() {65536, 0, 0, 0}) Me.UndoMemoryLimitCount.Minimum = New Decimal(New Integer() {1, 0, 0, 0}) Me.UndoMemoryLimitCount.Name = "UndoMemoryLimitCount" Me.UndoMemoryLimitCount.Size = New System.Drawing.Size(48, 22) Me.UndoMemoryLimitCount.TabIndex = 7 Me.ToolTipSlut.SetToolTip(Me.UndoMemoryLimitCount, "Maximum RAM usage of the undo feature.") Me.UndoMemoryLimitCount.Value = New Decimal(New Integer() {256, 0, 0, 0}) ' 'GroupBox1 ' Me.GroupBox1.Controls.Add(Me.Label4) Me.GroupBox1.Controls.Add(Me.Label3) Me.GroupBox1.Controls.Add(Me.UndoMemoryLimitCheckbox) Me.GroupBox1.Controls.Add(Me.Label2) Me.GroupBox1.Controls.Add(Me.UnlimitedUndosCheckbox) Me.GroupBox1.Controls.Add(Me.UndoStepLimit) Me.GroupBox1.Controls.Add(Me.UndoMemoryLimitCount) Me.GroupBox1.Location = New System.Drawing.Point(20, 182) Me.GroupBox1.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.GroupBox1.Name = "GroupBox1" Me.GroupBox1.Padding = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.GroupBox1.Size = New System.Drawing.Size(297, 110) Me.GroupBox1.TabIndex = 10 Me.GroupBox1.TabStop = False Me.GroupBox1.Text = "Undo (WIP)" ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(96, 79) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(28, 17) Me.Label4.TabIndex = 10 Me.Label4.Text = "MB" ' 'Button4 ' Me.Button4.Location = New System.Drawing.Point(297, 32) Me.Button4.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button4.Name = "Button4" Me.Button4.Size = New System.Drawing.Size(116, 26) Me.Button4.TabIndex = 2 Me.Button4.Text = "My Documents" Me.ToolTipSlut.SetToolTip(Me.Button4, "Set the base directory to your Documents folder.") Me.Button4.UseVisualStyleBackColor = True ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Enabled = False Me.Label5.Location = New System.Drawing.Point(259, 344) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(119, 17) Me.Label5.TabIndex = 11 Me.Label5.Text = "Lynnear Software" ' 'TransparencyCheckbox ' Me.TransparencyCheckbox.AutoSize = True Me.TransparencyCheckbox.Location = New System.Drawing.Point(16, 142) Me.TransparencyCheckbox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.TransparencyCheckbox.Name = "TransparencyCheckbox" Me.TransparencyCheckbox.Size = New System.Drawing.Size(176, 21) Me.TransparencyCheckbox.TabIndex = 3 Me.TransparencyCheckbox.Text = "Transparency on Move" Me.ToolTipSlut.SetToolTip(Me.TransparencyCheckbox, "Should the Notepad Ultra window become transparent (see-through)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "while being mov" & "ed?") Me.TransparencyCheckbox.UseVisualStyleBackColor = True ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.Location = New System.Drawing.Point(254, 89) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(120, 17) Me.Label6.TabIndex = 12 Me.Label6.Text = "Default Encoding:" ' 'EncodingDropdown ' Me.EncodingDropdown.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.EncodingDropdown.FormattingEnabled = True Me.EncodingDropdown.Items.AddRange(New Object() {"UTF-8", "UTF-16", "UTF-32"}) Me.EncodingDropdown.Location = New System.Drawing.Point(376, 86) Me.EncodingDropdown.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.EncodingDropdown.Name = "EncodingDropdown" Me.EncodingDropdown.Size = New System.Drawing.Size(81, 24) Me.EncodingDropdown.TabIndex = 13 Me.ToolTipSlut.SetToolTip(Me.EncodingDropdown, "Encoding to use when the encoding could not be detected," & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "and when saving new fil" & "es." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "You should probably leave this as UTF-8.") ' 'GreenNotificationsCheckbox ' Me.GreenNotificationsCheckbox.AutoSize = True Me.GreenNotificationsCheckbox.Location = New System.Drawing.Point(256, 114) Me.GreenNotificationsCheckbox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.GreenNotificationsCheckbox.Name = "GreenNotificationsCheckbox" Me.GreenNotificationsCheckbox.Size = New System.Drawing.Size(189, 21) Me.GreenNotificationsCheckbox.TabIndex = 3 Me.GreenNotificationsCheckbox.Text = "Show Green Notifications" Me.ToolTipSlut.SetToolTip(Me.GreenNotificationsCheckbox, "Low-priority messages that tell you that an operation completed successfully." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Fo" & "r example: ""Changed directory"" or ""File has been saved"".") Me.GreenNotificationsCheckbox.UseVisualStyleBackColor = True ' 'setCustomColours ' Me.setCustomColours.Location = New System.Drawing.Point(319, 167) Me.setCustomColours.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.setCustomColours.Name = "setCustomColours" Me.setCustomColours.Size = New System.Drawing.Size(139, 28) Me.setCustomColours.TabIndex = 14 Me.setCustomColours.Text = "Edit Themes" Me.setCustomColours.UseVisualStyleBackColor = True ' 'DefaultButton ' Me.DefaultButton.Location = New System.Drawing.Point(101, 341) Me.DefaultButton.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.DefaultButton.Name = "DefaultButton" Me.DefaultButton.Size = New System.Drawing.Size(71, 23) Me.DefaultButton.TabIndex = 14 Me.DefaultButton.Text = "Defaults" Me.ToolTipSlut.SetToolTip(Me.DefaultButton, "Restore settings to their defaults.") Me.DefaultButton.UseVisualStyleBackColor = True ' 'Button5 ' Me.Button5.Location = New System.Drawing.Point(319, 200) Me.Button5.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button5.Name = "Button5" Me.Button5.Size = New System.Drawing.Size(139, 28) Me.Button5.TabIndex = 14 Me.Button5.Text = "Status Bar Options" Me.ToolTipSlut.SetToolTip(Me.Button5, "Information to display in the status bar.") Me.Button5.UseVisualStyleBackColor = True ' 'ToolTipSlut ' Me.ToolTipSlut.ToolTipTitle = "Get it? It's called ""ToolTipSlut"" because it takes aaaall the tooltips, and only " & "hesitates for half a second! <3" ' 'DefaultTheme ' Me.DefaultTheme.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.DefaultTheme.FormattingEnabled = True Me.DefaultTheme.Items.AddRange(New Object() {"Standard", "Night Mode", "Special"}) Me.DefaultTheme.Location = New System.Drawing.Point(123, 85) Me.DefaultTheme.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.DefaultTheme.Name = "DefaultTheme" Me.DefaultTheme.Size = New System.Drawing.Size(116, 24) Me.DefaultTheme.TabIndex = 13 Me.ToolTipSlut.SetToolTip(Me.DefaultTheme, "Which theme should be applied at startup?") ' 'Button7 ' Me.Button7.Location = New System.Drawing.Point(318, 264) Me.Button7.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button7.Name = "Button7" Me.Button7.Size = New System.Drawing.Size(139, 28) Me.Button7.TabIndex = 14 Me.Button7.Text = "Preset Directories" Me.ToolTipSlut.SetToolTip(Me.Button7, "Set your most commonly used directories to return to " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "[TODO: REWRITE THIS WHEN I" & "T'S NOT 0333]") Me.Button7.UseVisualStyleBackColor = True ' 'RecycleBinCheckbox ' Me.RecycleBinCheckbox.AutoSize = True Me.RecycleBinCheckbox.Location = New System.Drawing.Point(256, 142) Me.RecycleBinCheckbox.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.RecycleBinCheckbox.Name = "RecycleBinCheckbox" Me.RecycleBinCheckbox.Size = New System.Drawing.Size(133, 21) Me.RecycleBinCheckbox.TabIndex = 3 Me.RecycleBinCheckbox.Text = "Use Recycle Bin" Me.ToolTipSlut.SetToolTip(Me.RecycleBinCheckbox, "If enabled, files deleted through Notepad Ultra will" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "be moved to the recycle bin" & ". Otherwise, they will be" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "erased from the disk immediately.") Me.RecycleBinCheckbox.UseVisualStyleBackColor = True ' 'Label7 ' Me.Label7.AutoSize = True Me.Label7.Location = New System.Drawing.Point(13, 86) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(105, 17) Me.Label7.TabIndex = 12 Me.Label7.Text = "Default Theme:" ' 'Button6 ' Me.Button6.Location = New System.Drawing.Point(318, 232) Me.Button6.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button6.Name = "Button6" Me.Button6.Size = New System.Drawing.Size(139, 28) Me.Button6.TabIndex = 14 Me.Button6.Text = "File Extensions" Me.Button6.UseVisualStyleBackColor = True ' 'Button3 ' Me.Button3.Location = New System.Drawing.Point(318, 296) Me.Button3.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(139, 28) Me.Button3.TabIndex = 14 Me.Button3.Text = "File Opening" Me.Button3.UseVisualStyleBackColor = True ' 'Settings ' Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(469, 375) Me.Controls.Add(Me.DefaultButton) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Button7) Me.Controls.Add(Me.Button6) Me.Controls.Add(Me.Button5) Me.Controls.Add(Me.setCustomColours) Me.Controls.Add(Me.DefaultTheme) Me.Controls.Add(Me.EncodingDropdown) Me.Controls.Add(Me.Label7) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.Label5) Me.Controls.Add(Me.GroupBox1) Me.Controls.Add(Me.SaveButton) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.SidebarCheckbox) Me.Controls.Add(Me.RecycleBinCheckbox) Me.Controls.Add(Me.GreenNotificationsCheckbox) Me.Controls.Add(Me.TransparencyCheckbox) Me.Controls.Add(Me.Button4) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.BaseDirBox) Me.Controls.Add(Me.Label1) Me.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2) Me.MaximizeBox = False Me.Name = "Settings" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent Me.Text = "Notepad Ultra - Settings" CType(Me.UndoStepLimit, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.UndoMemoryLimitCount, System.ComponentModel.ISupportInitialize).EndInit() Me.GroupBox1.ResumeLayout(False) Me.GroupBox1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label1 As Label Friend WithEvents BaseDirBox As TextBox Friend WithEvents Button1 As Button Friend WithEvents SidebarCheckbox As CheckBox Friend WithEvents DirectoryPicker As FolderBrowserDialog Friend WithEvents Button2 As Button Friend WithEvents SaveButton As Button Friend WithEvents Label2 As Label Friend WithEvents UndoStepLimit As NumericUpDown Friend WithEvents Label3 As Label Friend WithEvents UnlimitedUndosCheckbox As CheckBox Friend WithEvents UndoMemoryLimitCheckbox As CheckBox Friend WithEvents UndoMemoryLimitCount As NumericUpDown Friend WithEvents GroupBox1 As GroupBox Friend WithEvents Button4 As Button Friend WithEvents Label4 As Label Friend WithEvents Label5 As Label Friend WithEvents TransparencyCheckbox As CheckBox Friend WithEvents Label6 As Label Friend WithEvents EncodingDropdown As ComboBox Friend WithEvents GreenNotificationsCheckbox As CheckBox Friend WithEvents setCustomColours As Button Friend WithEvents DefaultButton As Button Friend WithEvents Button5 As Button Friend WithEvents ToolTipSlut As ToolTip Friend WithEvents Label7 As Label Friend WithEvents DefaultTheme As ComboBox Friend WithEvents Button6 As Button Friend WithEvents Button7 As Button Friend WithEvents RecycleBinCheckbox As CheckBox Friend WithEvents Button3 As Button End Class