• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Determine the height of the title bar without any API calls.

Determine the height of the title bar without any API calls.

Determine the height of the title bar without any API calls.

Rate Determine the height of the title bar without any API calls.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim iOldTBH, iTBH As Integer

Private Sub Form_Load()

    'Questions? Send them to [email protected]

    'Store the current forms height
    iOldTBH = Me.Height
    
    'Set the forms height to zero, yes 0!
    Me.Height = 0
    
    'Store the new height of the form (windows will only allow a window to be as
    'short as the total height of the title bar + boarders)
    iTBH = Me.Height
    
    'restore the original height of the form
    Me.Height = iOldTBH
    
End Sub