The code editor now properly handles both TAB and CTRL+A

morphx666 · Dec 30, 2016 · a86b814 · a86b814
1 parent 4d0eadd
commit a86b814
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 4 deletions.
diff --git a/LSysInt Tester/FormMain.vb b/LSysInt Tester/FormMain.vb
@@ -84,6 +84,12 @@ Public Class FormMain
                                                 Timeout.Infinite)
 
         AddHandler TextBoxCode.TextChanged, Sub() updateCodeTimer.Change(500, Timeout.Infinite)
+        AddHandler TextBoxCode.PreviewKeyDown, Sub(s1 As Object, e1 As PreviewKeyDownEventArgs)
+                                                   Select Case e1.KeyCode
+                                                       Case Keys.Tab : e1.IsInputKey = True
+                                                       Case Keys.A : If e1.KeyData And Keys.Control Then TextBoxCode.SelectAll()
+                                                   End Select
+                                               End Sub
         AddHandler ComboBoxLSysCodeDefs.SelectedIndexChanged, Sub()
                                                                   TextBoxCode.Text = CType(ComboBoxLSysCodeDefs.SelectedItem, LSysCodeDef).Code
                                                                   TextBoxCode.SelectionStart = 0

diff --git a/LSysInt Tester/My Project/AssemblyInfo.vb b/LSysInt Tester/My Project/AssemblyInfo.vb
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2016.12.30.503")>
-<Assembly: AssemblyFileVersion("2016.12.30.503")>
+<Assembly: AssemblyVersion("2016.12.30.510")>
+<Assembly: AssemblyFileVersion("2016.12.30.510")>
diff --git a/LSysInt/My Project/AssemblyInfo.vb b/LSysInt/My Project/AssemblyInfo.vb
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2016.12.30.222")>
-<Assembly: AssemblyFileVersion("2016.12.30.222")>
+<Assembly: AssemblyVersion("2016.12.30.224")>
+<Assembly: AssemblyFileVersion("2016.12.30.224")>