✔ Problem mit Tastatureingabe in DirectX Anwendung

[Rene42]

Hi Leute,

nach einigem Meckern habe ich VB nun überredet eine DirectX Anwendung zu starten, die ein rotes Bild anzeigt.

Nun versuche ich mit zwei Codevarianten, diese wieder zu beenden

1.Auf der Seite gefunden

Private Sub form1_KeyDown(ByVal sender As Object, ByVal e _ 
As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
 If e.KeyCode = Keys.Escape Then
  ending()
 End If
End Sub

2.Selbst erstellt:

 Private Sub form1_KeyDown(ByVal sender As Object, ByVal e _
As System.Windows.Forms.KeyPressEventArgs) Handles Me.Click
        Select Case e.KeyChar
            Case Keys.Escape.ToString
                zd.Ende()
                zd = Nothing
                Me.Close()
            Case "e"
                zd.Ende()
                zd = Nothing
                Me.Close()
        End Select
    End Sub

Leider reagiert meine Anwendung weder bei der einen noch bei der anderen Version auf Tasteneingaben.

Am liebsten wäre mir natürlich, wenn die erste Variante durchzuführen wäre.

Gruß Rene

 

[Erik]

Hi,

Kann es sein das du das Programm in einer Endlosschleife Rendern lässt?
Füg doch mal am Ende der Schleife ein Application.DoEvents ein.

Gruß
x y z

 

[Rene42]

Hi xyz,

du hattest Recht, besten dank, dass du den Fehler mal eben erraten hast.

Hatte erst gedacht, "Application.DoEvents" sei der Platzhalter für eine Funktion die dort was tut.:-( Nun hab ich es aber verstanden.

Gruß Rene