Advertisement
7_2009-2012 Miscellaneous #226370

Change ShowInTaskbar at Runtime

This code will allow you to change the .ShowInTaskBar at runtime. Please Comment and Vote.

AI

Podsumowanie AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Kod źródłowy
original-source
'Window API
Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
'Window Constants
Public Const GWL_EXSTYLE = (-20)
Public Sub SetShowInTaskbar(Visible As Boolean, hWnd As Long)
  Dim Ret As Long
  Dim lNewLong As Long
      
  Select Case Visible
    Case True
      lNewLong = -128
    Case False
      lNewLong = 128
  End Select
  
  Ret = SetWindowLong(hWnd, GWL_EXSTYLE, lNewLong)
  
End Sub

Oryginalne komentarze (3)
Odzyskane z Wayback Machine