Added a check to make sure the user cannot use the same Key twice for actions Added a count down timer update for when a user is setting the start position so they know how long they need to wait Added an offset to the final click in the action so the mouse re-clicks the app window into focus Removed some unused code and Cleaned up some methods
96 lines
3.3 KiB
VB.net
96 lines
3.3 KiB
VB.net
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
|
Partial Class FrmCapture
|
|
Inherits System.Windows.Forms.Form
|
|
|
|
'Form overrides dispose to clean up the component list.
|
|
<System.Diagnostics.DebuggerNonUserCode()>
|
|
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.
|
|
<System.Diagnostics.DebuggerStepThrough()>
|
|
Private Sub InitializeComponent()
|
|
Me.components = New System.ComponentModel.Container()
|
|
Me.Label1 = New System.Windows.Forms.Label()
|
|
Me.Label2 = New System.Windows.Forms.Label()
|
|
Me.Label3 = New System.Windows.Forms.Label()
|
|
Me.LblKeySet = New System.Windows.Forms.Label()
|
|
Me.MovePoleTick = New System.Windows.Forms.Timer(Me.components)
|
|
Me.SuspendLayout()
|
|
'
|
|
'Label1
|
|
'
|
|
Me.Label1.AutoSize = True
|
|
Me.Label1.Location = New System.Drawing.Point(12, 9)
|
|
Me.Label1.Name = "Label1"
|
|
Me.Label1.Size = New System.Drawing.Size(231, 13)
|
|
Me.Label1.TabIndex = 0
|
|
Me.Label1.Text = "Click to START Capture, and RELEASE to End"
|
|
'
|
|
'Label2
|
|
'
|
|
Me.Label2.AutoSize = True
|
|
Me.Label2.Location = New System.Drawing.Point(293, 391)
|
|
Me.Label2.Name = "Label2"
|
|
Me.Label2.Size = New System.Drawing.Size(112, 13)
|
|
Me.Label2.TabIndex = 1
|
|
Me.Label2.Text = "Press Escape to Save"
|
|
'
|
|
'Label3
|
|
'
|
|
Me.Label3.AutoSize = True
|
|
Me.Label3.Location = New System.Drawing.Point(12, 391)
|
|
Me.Label3.Name = "Label3"
|
|
Me.Label3.Size = New System.Drawing.Size(60, 13)
|
|
Me.Label3.TabIndex = 2
|
|
Me.Label3.Text = "Key set to: "
|
|
'
|
|
'LblKeySet
|
|
'
|
|
Me.LblKeySet.AutoSize = True
|
|
Me.LblKeySet.Location = New System.Drawing.Point(78, 391)
|
|
Me.LblKeySet.Name = "LblKeySet"
|
|
Me.LblKeySet.Size = New System.Drawing.Size(0, 13)
|
|
Me.LblKeySet.TabIndex = 3
|
|
'
|
|
'MovePoleTick
|
|
'
|
|
Me.MovePoleTick.Enabled = True
|
|
Me.MovePoleTick.Interval = 1
|
|
'
|
|
'FrmCapture
|
|
'
|
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
|
Me.ClientSize = New System.Drawing.Size(417, 413)
|
|
Me.Controls.Add(Me.LblKeySet)
|
|
Me.Controls.Add(Me.Label3)
|
|
Me.Controls.Add(Me.Label2)
|
|
Me.Controls.Add(Me.Label1)
|
|
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
|
Me.Name = "FrmCapture"
|
|
Me.Text = "Capturing Input"
|
|
Me.ResumeLayout(False)
|
|
Me.PerformLayout()
|
|
|
|
End Sub
|
|
|
|
Friend WithEvents Label1 As Label
|
|
Friend WithEvents Label2 As Label
|
|
Friend WithEvents Label3 As Label
|
|
Friend WithEvents LblKeySet As Label
|
|
Friend WithEvents MovePoleTick As Timer
|
|
End Class
|