Announcement

Collapse
No announcement yet.

Internet Explorer Speichern unter Steuerelement finden und Inhalt ändern

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Internet Explorer Speichern unter Steuerelement finden und Inhalt ändern

    Ich möchte beim Internet Explorer im Dialogfeld Speichern unter den Wert des Dateinamen einlesen und ändern.
    Ich habe es mit FindWindowEx versucht, was aber nicht funktionieren kann, weil ich nicht weiß, wie das Steuerelement heißt.

    Ich brauche Hilfe.

  • #2
    Tja, als erstes wäre wohl ein Hinweis erforderlich mit was für einer Sprache/IDE du arbeitest. Schließlich kann hier keiner hellsehen. Des Weiteren ist die systemweite Änderung/Zugriff auf die Open/Save-Dialoge nicht aus jeder Sprache heraus möglich
    Christian

    Comment


    • #3
      Ich dachte ich hätte mich klar ausgedrückt.
      Ich habe den Namen des Steuerelements dann doch noch mit google gefunden.
      Den Text neu setzen, habe ich zwar noch nicht herausgefunden, aber ich schreibe trotzdem mal wie weit ich jetzt bin.
      Das gesuchte Steuerelement heißt "ComboBoxEx32".

      Code:
      'API um Fenster zu finden
      Declare Function FindWindow Lib "user32" _
                       Alias "FindWindowA" ( _
                       ByVal lpClassName As String, _
                       ByVal lpWindowName As String) As IntPtr
      
      'API um Steuerelement zu finden
      Private Declare Function FindWindowEx Lib "user32.dll" Alias "FindWindowExA" (ByVal parentHandle As IntPtr, _
                            ByVal childAfter As IntPtr, _
                            ByVal lclassName As String, _
                            ByVal windowTitle As String) As IntPtr
      
      
      
      'Function um "Speichern unter"-Fenster zu finden
          Function GetHandle_Speichern_unter(ByRef HandleWindow As IntPtr) As Boolean
              Const TITLE     As String = "Speichern unter"
      
              HandleWindow = IntPtr.Zero
      
              HandleWindow = FindWindow(vbNullString, TITLE)
      
              If HandleWindow = IntPtr.Zero Then GoTo errExit
                  '--->>
                  '--->>
      
              Return True
      errExit:
              HandleWindow = IntPtr.Zero
              Return False
          End Function
      Das Handle auf das gesuchte Steuerelement hole ich mit: FindWindowEx(HandleWindow, 0, "ComboBoxEx32", vbNullString).

      Wenn noch jemand Hinweise hat oder weiß wie die anderen Steuerelemente heißen, wäre das toll.

      Comment


      • #4
        Ich dachte ich hätte mich klar ausgedrückt.
        Womit?

        Da du unter

        Forum / Windows / Win32 API / Allgemein

        postest. Sollen wir raten mit welcher Sprache? Nun an dem Code lässt sich erkennen, das es wahrscheinlich irgendein Basic Dialekt sein wird. Die Nachfrage nach der Sprache deshalb, weil man das ebenauch anders lösen könnte. Aber ist ja nun egal
        Zuletzt editiert von Christian Marquardt; 10.11.2012, 21:14.
        Christian

        Comment

        Working...
        X