VB-Homepage Tipp 022

Programm nicht in der Taskbar anzeigen (16Bit)

Während es in VB4 ja eine Eigenschaft der Form gibt, ob diese in der Taskbar angezeigt werden soll (ShowInTaskbar), ist dies, als Eigenschaft, unter VB3 unbekannt.
Möchten Sie dies trotzdem, können Sie folgende Prozedur verwenden.
Nützlich zum Beispiel für Programme die explixit nur im Hintergrund laufen sollen.

General/Declarations 'der Form
Const GW_OWNER = 4
Const SW_HIDE = 0
Declare Function GetWindow Lib "User" (ByVal hWnd As Integer, ByVal wCmd As Integer) As Integer
Declare Function ShowWindow Lib "User" (ByVal hWnd As Integer, ByVal nCmdShow As Integer) As Integer

General/SetFormInvisible 'wird durch das Eingeben des Codes erzeugt
Sub SetFormInvisible (frm As Form)
Dim ownerhWnd As Integer
Dim dummy As Integer
frm.Visible = False
ownerhWnd = GetWindow(frm.hWnd, GW_OWNER)
dummy = ShowWindow(ownerhWnd, SW_HIDE)
End Sub

Form1/Load oder Command1/Click oder...
Call SetFormInvisible(Form1)    'Name der Form

Tipp-Download

Quelle :

Zurück zur Übersichtsseite