Taste belegt aber keine Reaktion

Sam85 · 5. Oktober 2016, 16:26

Hallo,

ich habe bei diesem Code Schwierigkeiten mit dem Rückruf der Form. Das minimieren klappt wunderbar aber beim Return (wieder auf Normal) reagiert die Form nicht.
Habe ich etwas wesentliches übersehen? Oder muss ich das generell anders bewerkstelligen? (Bin Anfänger.)

Freue mich über Feedback.

VB.NET-Quellcode

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
KeyPreview = True
End Sub
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.F Then
Button2.Focus()
End If
If e.KeyCode = Keys.W Then
MyBase.WindowState = FormWindowState.Normal
ElseIf e.KeyCode = Keys.Q Then
MyBase.WindowState = FormWindowState.Minimized
End If
End Sub

Schamash · 5. Oktober 2016, 16:31

Die Schwierigkeit ist hier das du kein "Me.KeyDown" mit dem Key.W hast.
Denn die Form ist nicht mehr im Focus wenn du versuchst sie mit "W" wieder zu reaktivieren.
Was du benötigst wäre ein Hotkey -> Hotkey setzten

Sam85 · 5. Oktober 2016, 16:33

Hallo Schamash,

ich schätze du meinst in dem Thread die Antwort von TVX, oder?
Ich probiere das mit dem Hotkey mal aus, vielen Dank für den Hinweis.

MichaHo · 5. Oktober 2016, 16:36

bin mir nicht sicher, aber wenn die Form Minimiert ist, verliert sie wohl den Focus und dann greift das KeyDown Event nicht mehr.

ich hab so etwas ähnliches mal in einem Projekt gemacht, das geht besser über ein Form Handel.
dazu folgendes unterhalb von Public Class Form1

VB.NET-Quellcode

Private Declare Function RegisterHotKey Lib "user32" (ByVal hWnd As IntPtr, ByVal id As Integer, ByVal fsModifier As Integer, ByVal vk As Integer) As Integer
Private Declare Sub UnregisterHotKey Lib "user32" (ByVal hWnd As IntPtr, ByVal id As Integer)
Private Const Key_NONE As Integer = &H0
Private Const Key_ALT As Integer = &H1
Private Const WM_HOTKEY As Integer = &H312

dann kannst Du im Load Ereignis den Key Registrieren:

VB.NET-Quellcode

RegisterHotKey(Me.Handle, 1, Key_ALT, Keys.F12)

und im Form_Closing wieder De-Registrieren:

VB.NET-Quellcode

UnregisterHotKey(Me.Handle, 1)

und die Sub, die das Ein und Ausblenden bearbeitet:

VB.NET-Quellcode

Protected Overrides Sub WndProc(ByRef m As Message)
If m.Msg = WM_HOTKEY Then
Me.Visible = Not Me.Visible
niMain.Visible = Not Me.Visible
End If
MyBase.WndProc(m)
End Sub

EDIT: da war ich zu spät

Sam85 · 5. Oktober 2016, 16:39

Hallo MichaHo,

zu spät auf keinem Fall, dein Vorschlag erscheint mir transparenter (für einen Anfänger). Werde mich gleich mal dran machen.

Vielen Dank!

MichaHo · 5. Oktober 2016, 16:41

MichaHo schrieb:

niMain.Visible = Not Me.Visible

kannst Du weg lassen, das ist das NotifyIcon was ein oder ausgeblendet wird...

Schamash · 5. Oktober 2016, 16:55

Ich würde nur einen anderen Key wie F12 verwenden:

"The F12 key is reserved for use by the debugger at all times, so it should not be registered as a hot key. Even when you are not debugging an application, F12 is reserved in case a kernel-mode debugger or a just-in-time debugger is resident."

MSDN-Link

MichaHo · 5. Oktober 2016, 18:04

@Schamash Danke für den Tip

Sam85 · 6. Oktober 2016, 08:37

Hallo MichaHo, (und andere)

es hat wunderbar funktioniert

vielen Dank.

Eine Frage am Rande: Ich habe ein ComponentModel eingefügt und wollte den Code auf alle Forms übertragen.
A. Geht das so überhaupt?
B. Anschließend habe ich das ComponentModel gelöscht (der Code war dort bereits eingefügt) und nun öffnet sich das Form bei der Tastenkombination doppelt.

Über

VB.NET-Quellcode

Public Class Form1

hat sich

VB.NET-Quellcode

Imports System.ComponentModel

eingetragen. Will ich es entfernen wird das "CancelEventArgs" und "Closing" gestoppt (rot markiert).

VB.NET-Quellcode

Private Sub Form1_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
UnregisterHotKey(Me.Handle, 1)
End Sub

Kann ich das CM dennoch irgendwie entfernen bzw. das ComponentModel wiederherstellen um den Code zu entfernen? Oder wie geht man da am besten vor? (Anfänger halt :whistling:

)
Freue mich über eine Rückmeldung.

Nachtrag: (Fehlermeldung wenn ich "Imports System.ComponentModel" entfernen will)

Fehler BC31029 Die Form1_Closing-Methode kann das Closing-Ereignis nicht behandeln, da die Signaturen inkompatibel sind.
Fehler BC30002 Der Typ "CancelEventArgs" ist nicht definiert.

Sam85 · 6. Oktober 2016, 16:42

Wollte nochmal nachfragen,

wie bekomme ich "Imports System.ComponentModel" aus meiner Form, ohne das die Fehlermeldungen kommen (siehe Beitrag ober drüber). Bzw. wie entferne ich einfach das gesamte ComponentModel und die Verbindungen?
Habe es zwar gelöscht aber es scheint immer noch "irgendwo" vorhanden zu sein?

Freue mich über Feedback.

ErfinderDesRades · 6. Oktober 2016, 19:38

Die Imports-Anweisung muss im Form drinne bleiben.
CancelEventArgs ist eine Klasse im System.ComponentModel-Namespace, und deshalb musste den auch importieren.
Ein Fehlverhalten ergibt sich daraus allerhöchstwahrscheinlich nicht (sondern da liegts wohl an was annerem).

Sam85 · 6. Oktober 2016, 19:45

Ich hatte eine neue ComponentClass eingefügt. Den oben genannten Code eingefügt (wobei der Code in der Form ebenfalls vorhanden war) und dann nachträglich die neue ComponentClass einfach wieder gelöscht. Seit dem wird der Befehl doppelt ausgeführt. Wie kann ich der Lösung besser auf die Spur kommen?

ErfinderDesRades · 6. Oktober 2016, 19:54

ich hab keine Ahnung, was eiglich du mit "ComponentClass" meinst. Im ObjectBrowser taucht sowas bei mir nicht auf.

Sam85 · 7. Oktober 2016, 08:02

Ich hab mal einen Screenshot angehängt, damit du weißt was ich meine (Komponentenklasse).
Seltsamerweise ist es heute so, das die Form nicht mehr doppelt ausgeführt wird. Kann das das "Ausschalten" etwas verändern? :?:

Dennoch ist "Imports System.ComponentModel" weiter vorhanden.

ErfinderDesRades · 10. Oktober 2016, 04:55

Ah - das meinst du.
Nu Frage: Warum hast du deinem Projekt eine KomponentenKlasse zugefügt - wozu brauchst du die?
Weil das ist äusserst selten, dass man sowas braucht, und auch erst in recht fortgeschrittener Programmierung, wenn man selbst Steuerelemente u.ä. entwickeln will - also selbstgebastelte Sachen, die man dann aus der Toolbox aufs Form ziehen kann.

Sam85 · 10. Oktober 2016, 07:51

Hallo ErfinderdesRades,

deswegen habe ich es wieder gelöscht, ich brauch die Komponentklasse nicht (bin leider so neu, dass ich nicht wusste wozu es gut ist).
Nun ist es aber irgendwie schon mit einer Form verknüpft.

Taste belegt aber keine Reaktion

Taste belegt aber keine Reaktion

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

MichaHo schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

4 Benutzer haben hier geschrieben