Rubrik: Fenster | 22.03.05 |
GetFocus-Funktion Diese Funktion ermittelt das Fensterhandle des Fensters, das im aktuellen Thread den Focus besitzt. | ||
Betriebssystem: Win95, Win98, WinNT 3.1, Win2000, WinME | Views: 15.364 |
Deklaration:
Declare Function GetFocus Lib "user32.dll" () As Long
Beschreibung:
Diese Funktion ermittelt das Fensterhandle des Fensters, das im aktuellen Thread den Focus besitzt.
Parameter:
keine |
Rückgabewert:
Ist die Funktion erfolgreich, so liefert sie das Fensterhandle des Fensters, das den Focus besitzt. Tritt ein Fehler auf oder gehört das Fenster mit dem Focus nicht zumaufrufenden Thread, so ist die Rückgabe der Wert "0". Für erweiterte Fehlerinformationen rufenSie die GetLastError-Funktion auf.
Beispiel:
Private Declare Function GetActiveWindow Lib "user32.dll" () As Long Private Declare Function GetFocus Lib "user32.dll" () As Long Private Declare Function GetForegroundWindow Lib "user32.dll" () As Long Private Declare Function GetTopWindow Lib "user32.dll" (ByVal hwnd As Long) As Long
' gibt eine Status-Liste der vorhandenen Fenster zurück Private Sub Form_Load() Me.AutoRedraw = True Me.CurrentX = 50 Me.CurrentY = 50 Me.Print "Actives Fenster: " & GetActiveWindow Me.CurrentX = 50 Me.Print "Vordergrund Fenster: " & GetForegroundWindow Me.CurrentX = 50 Me.Print "Fenster mit dem Focus: " & GetFocus Me.CurrentX = 50 Me.Print "Control mit dem Focus: " & GetTopWindow(GetFocus) End Sub