Taste an Editor senden

    • VB.NET

    Es gibt 11 Antworten in diesem Thema. Der letzte Beitrag () ist von Datzju.

      Taste an Editor senden

      VB.NET-Quellcode

      1. Public Class Form1
      4. Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" ( _
      5. ByVal lpClassName As String, _
      6. ByVal lpWindowName As String) As IntPtr
      8. Private Declare Function FindWindowEx Lib "user32.dll" Alias "FindWindowExA" ( _
      9. ByVal hWndParent As Int32, _
      10. ByVal hWndChildAfter As Int32, _
      11. ByVal lpszClass As String, _
      12. ByVal lpszWindow As String) As Int32
      17. Private Declare Function PostMessage Lib "user32.dll" Alias "PostMessageA" ( _
      18. ByVal hwnd As Int32, _
      19. ByVal wMsg As Int32, _
      20. ByVal wParam As Int32, _
      21. ByVal lParam As Int32) As Int32
      22. Private Const WM_CHAR As Int32 = &H102
      24. Private hwnd As IntPtr
      25. Private f As IntPtr
      30. Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
      31. hwnd = FindWindow(vbNullString, "Unbenannt - Editor")
      32. f = FindWindowEx(hwnd, 0, "Edit", vbNullString)
      34. End Sub
      37. Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
      38. PostMessage(f, WM_CHAR, Asc(e.KeyChar), 0)
      39. End Sub
      40. End Class

      Beispiel

      Also ich habe es so geregelt:

      VB.NET-Quellcode

      1. Form1_load(byval.....
      2. Process.Start("Notepad.exe")
      3. End Sub


      Und dann einfach findwindow noch ins Keypress geschoben und dann hat es bei mir Prima funktioniert.
      Das ist jetzt nicht auf das Problem mit dem Spiel bezogen, sondern auf meinen ersten Beitrag in dem ich schrieb, dass ich Findwindow ins Keypress verschoben habe.

      _____________________________

      MFG Markus
      Dateien

      Von einem Spiel??
      Das Programm sucht ja nach dem Handle von der Editbox und sendet dieser dann die Tasten.
      In einen Spiel wär es glaubich sinnvoller das über SendKeys zu regeln...
      Oder direkt ans Fenster-Handle, aber ich weiß nicht ob das funkt

      Das Problem bei einem Spiel wie aber auch bei manchen guten Programmen ist , das das ganze Programm nur ein Control ist.

      D.h. du hast für das ganze Programm evtl. nur ein Handle.

      Und somit kannst du nicht die einzelnen Controls identifizieren und nicht auf die Controls zugreifen.

      markushettmann schrieb:

      Also ich habe es so geregelt:

      VB.NET-Quellcode

      1. Form1_load(byval.....
      2. Process.Start("Notepad.exe")
      3. End Sub


      Und dann einfach findwindow noch ins Keypress geschoben und dann hat es bei mir Prima funktioniert.
      Das ist jetzt nicht auf das Problem mit dem Spiel bezogen, sondern auf meinen ersten Beitrag in dem ich schrieb, dass ich Findwindow ins Keypress verschoben habe.

      _____________________________

      MFG Markus
      DIE IDEE IST GUT!

    Facebook
    Telefonspende