• Home
 · 
• Custom Controls/Forms/Menus
 · 
• TaskBar Height

TaskBar Height

The purpose of the code is to determine the height of the taskbar so that you can display a form at the bottom right hand corner of the screen everytime.

API Declarations
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Const SPI_GETWORKAREA = 48
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type

Rate TaskBar Height

• 1
• 2
• 3
• 4
• 5

(5(5 Vote))

' this code will display a form at the bottom right had corner everytime.
   dim WindowRect as RECT
   SystemParametersInfo SPI_GETWORKAREA, 0, WindowRect, 0
  
   FrmMain.Top = WindowRect.Bottom * Screen.TwipsPerPixelY - FrmMain.Height
   FrmMain.Left = WindowRect.Right * Screen.TwipsPerPixelX - FrmMain.Width