vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück
Rubrik: Oberfläche · Fenster   |   VB-Versionen: VB4, VB5, VB623.06.04
Fenster im Hintergrund anzeigen

Dieser Tipp verrät, wie sich ein Fenster anzeigen lässt, ohne dass es den Fokus bekommt.

Autor:   MartoengBewertung:     [ Jetzt bewerten ]Views:  18.637 
www.martoeng.deSystem:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 Beispielprojekt auf CD 

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