AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

sdflh

Browse Source
This commit is contained in:
Jonathan Jenne
2019-09-19 16:21:13 +02:00
parent 0ec5829275
commit f3a3812993
7 changed files with 85 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Automation/Form1.vb
View File

@@ -24,12 +24,13 @@ Public Class Form1
End Sub
Private Sub Watcher_ClipboardChanged(sender As Object, e As IDataObject)
Dim oControl As Window.RectangleInfo = Window.GetFocusedControlLocation(CurrentAnchor)
Dim oControl As Window.RectangleInfo = Window.GetFocusedControlLocation(Handle, CurrentAnchor)
TextBox9.Text = oControl.Left
TextBox12.Text = oControl.Right
TextBox11.Text = oControl.Top
TextBox10.Text = oControl.Bottom
TextBox3.Text = ComboBox1.Text.ToUpper
End Sub
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged