INIT OK 20.1.4
This commit is contained in:
@@ -22,18 +22,18 @@ Public Class NotePropertyEditor
|
||||
Return control
|
||||
End Function
|
||||
|
||||
Private Sub control_PreviewKeyDown(sender As Object, e As Windows.Forms.PreviewKeyDownEventArgs)
|
||||
Private Sub control_PreviewKeyDown(sender As Object, e As System.Windows.Forms.PreviewKeyDownEventArgs)
|
||||
Dim control As ComboBoxEdit = TryCast(sender, ComboBoxEdit)
|
||||
If e.KeyCode = Windows.Forms.Keys.F6 Then
|
||||
If e.KeyCode = System.Windows.Forms.Keys.F6 Then
|
||||
MsgBox(control.Text)
|
||||
control.EditValue = control.Text
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub control_KeyDown(sender As Object, e As Windows.Forms.KeyEventArgs)
|
||||
Private Sub control_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs)
|
||||
Dim control As ComboBoxEdit = TryCast(sender, ComboBoxEdit)
|
||||
If control.IsPopupOpen Then
|
||||
If e.KeyCode = Windows.Forms.Keys.F6 Then
|
||||
If e.KeyCode = System.Windows.Forms.Keys.F6 Then
|
||||
control.ClosePopup()
|
||||
MsgBox(control.Text)
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user