Taskbar - Determines if AutoHide is On

Category: Controls - .Techniques

Date: 03-28-2012

Return to Index


 
'Credit Daren Oliver
 
'Compilable Example:
#Compiler PBWin 9, PBWin 10
#Compile EXE
#Dim All
#Include "win32api.inc"
%IDC_Button = 500
Global hDlg,hListBox As Dword
 
Function PBMain() As Long
   Local i As Long
   Dialog New Pixels, 0, "ListBox Test",300,300,200,200, %WS_OverlappedWindow, 0 To hDlg
   Control Add Button, hDlg, %IDC_Button, "Check for Scrollbars", 10,10,150,20
   Dialog Show Modal hDlg Call DlgProc
End Function
 
CallBack Function DlgProc() As Long
   Select Case Cb.Msg
      Case %WM_Command
         Select Case Cb.Ctl
            Case %IDC_Button
               If IsTaskBarautoHide Then
                  ? "Taskbar AutoHide is ON"
               Else
                  ? "Taskbar AutoHide is OFF"
               End If
         End Select
   End Select
End Function
 
Function IsTaskBarAutoHide() As Long
   Local ABD AS APPBARDATA
   ABD.cbSize = SIZEOF(ABD)
   Function = SHAppBarMessage(%ABM_GETSTATE, ABD) AND %ABS_AUTOHIDE
End Function
 
'gbs_00808
'Date: 03-10-2012


created by gbSnippets
http://www.garybeene.com/sw/gbsnippets.htm