Fenster im Hintergrund anzeigen Dieser Tipp verrät, wie sich ein Fenster anzeigen lässt, ohne dass es den Fokus bekommt.
Autor:   Martoeng	Bewertung:     [ Jetzt bewerten ]	Views:  19.278
www.martoeng.de	System:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 25 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.8 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Folgendes Szenario:
Ihre Anwendung läuft unsichtbar im Hintergrund. Bei bestimmte Ereignissen soll ein Info-Fenster eingeblendet werden, aber so, dass es die aktuelle aktive Anwendung nicht stört. D.h. das Fenster soll zwar sichtbar auf dem Bildschirm angezeigt werden, aber nicht den Fokus erhalten! Die Show-Methode, sowie die Visible-Eigenschaft der Form scheiden somit aus, da die Form in diesem Fall immer autom. zur aktiven Form wird.

Wie lässt sich das Fokus-Problem nun umgehen?
Wie so oft hilft uns auch diesmal wieder die Windows-API Trickkiste.

Option Explicit
 
' benötigte API-Deklarationen
Private Declare Function SetWindowPos Lib "user32" ( _
  ByVal hwnd As Long, _
  ByVal hWndInsertAfter As Long, _
  ByVal x As Long, _
  ByVal y As Long, _
  ByVal cx As Long, _
  ByVal cy As Long, _
  ByVal wFlags As Long) As Long
 
Private Declare Function ShowWindow Lib "user32" ( _
  ByVal hwnd As Long, _
  ByVal nCmdShow As Long) As Long
 
Private Const HWND_TOPMOST As Long = -1
Private Const SWP_NOACTIVATE As Long = &H10
Private Const SWP_NOMOVE As Long = &H2
Private Const SWP_NOSIZE As Long = &H1
Private Const SW_SHOWNOACTIVATE = 4

' Form anzeigen, ohne dass diese den Fokus erhält
Load frmInfo
ShowWindow frmInfo.hwnd, SW_SHOWNOACTIVATE
SetWindowPos frmInfo.hwnd, HWND_TOPMOST, 0, 0, 0, 0, _
  SWP_NOACTIVATE + SWP_NOMOVE + SWP_NOSIZE

Dieser Aufruf der Form bewirkt, dass diese im Vordergrund angezeigt - aber doch im Hintergrund, d.h. die Form ist sichtbar, aber nicht aktiviert