Click here to Skip to main content
Click here to Skip to main content
Go to top

A class to put a ProgressBar or any control into a StatusBar

, 18 May 2005
Rate this:
Please Sign up or sign in to vote.
How to simply display a control inside the StatusBar of your program.

Introduction

It is not possible to directly put a ProgressBar or a button in a StatusBar in VB.NET. Solutions are available for C++ or VB 5 or 6.0. This is a way to do it in VB.NET. The previous version of this article, called StatusProgressBar only allowed using a ProgressBar. This new version extends the technique to any control.

Using the code

First, create a form with a StatusBar and a ProgressBar or any kind of control (tested with a button) you will put anywhere. You have to create at least a Panel in the StatusBar and make the Panels visible (.showpanels = True). The control put into the status bar will be called "child control".

Create an instance of StatusBarChild:

sbcProgressBar = New StatusBarChild(ProgressBar1, StatusBar1, 1)

The parameters are the ProgressBar (ProgressBar1), the StatusBar (StatusBar1) and the number of the statuspanel (0 for the first one on the left). An optional parameter is the margin between the statuspanel's edges and the ProgressBar. The ProgressBar is moved to the StatusBar when you create the StatusBarChild. You may put a button in the StatusBar the same way:

sbcButton= New StatusBarChild(Button1, StatusBar1, 1)

The StatusBarChild object's properties are the child control (.ChildObject), the StatusBar (.StatusBar), the panel number (.Panel) and the margin (.Margin). Its only method is .Resize, you should call it when the parent form is resized. See the demo for details.

How it works

The child control is declared as an object:

Public ChildControl As Control

The child control's parent is first changed:

 ChildControl.Parent = StatusBar

Then, it must be displayed in the proper panel. Since there is no property to get the Panel's actual width, an API call is necessary. SendMessage returns a RECT value containing the coordinates of the Panel.

Private Structure RECT
  Friend Left As Int32
  Friend Top As Int32
  Friend Right As Int32
  Friend Bottom As Int32
End Structure
Dim Rectangle As RECT
' Use the API to get the panel's display rectangle
SendMessage(StatusBar.Handle.ToInt32, SB_GETRECT, Panel, Rectangle)
' Resize
With ProgressBar
  .Left = Rectangle.Left + Margin
  .Top = Rectangle.Top + Margin
  .Height = Rectangle.Bottom - Rectangle.Top - 2 * Margin
  .Width = Rectangle.Right - Rectangle.Left - 2 * Margin
End With

You may use this technique to put any kind of control into a StatusBar, provided it has a .parent property.

The demo uses a button in the first panel, and a ProgressBar in the second one. Click the button to make the bar progress.

History

  • 1.1: Option Strict On allowed. See the first thread below.
  • 1.0: First public version. Did not allow Option Strict On.

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Share

About the Author

Eric Marcon
Engineer
France France
No Biography provided

Comments and Discussions

 
GeneralA really easy way PinmemberRyan Danforth10-Apr-08 16:54 
GeneralThanks PinmemberKeyPointAnalyzer13-Aug-07 5:19 
GeneralThanks PinmemberRanvA23-Apr-06 9:34 
GeneralAn alternative method PinmemberkaGyamfi29-Dec-05 1:17 
GeneralIn .Net v2.0 you will be able to do this. Pinmemberoshah16-May-05 2:19 
In .Net v2.0, the StatusBar control will be replaced with a StatusStrip. Inside this status strip, it will be possible to put in a status label, status panel / split button, progress bar, and a (Office 2003-style) dropdown button.
 
The status strip class[^].
 
However, for VS.NET [2003] and before, your class is still useful.

GeneralRe: In .Net v2.0 you will be able to do this. PinmemberEric Marcon17-May-05 2:12 
GeneralErrors when Option Strict is on Pinmemberwebbee9-Feb-05 10:26 
GeneralRe: Errors when Option Strict is on PinmemberEric Marcon11-Feb-05 7:57 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Mobile
Web04 | 2.8.140916.1 | Last Updated 18 May 2005
Article Copyright 2004 by Eric Marcon
Everything else Copyright © CodeProject, 1999-2014
Terms of Service
Layout: fixed | fluid