Copyright© Kambiz R. Khojasteh. All rights reserved.
Get future component updates from http://www.delphiarea.com.

DESCRIPTION

TStatusBarPro is an improved version of Delphi's TStatusBar. Each status panel in this status bar can have its own color, image, hint, popup menu, click event and double click event. In addition, TStatusBarPro accepts other controls as its child controls.

Note: TStatusBarPro is not a subclass of TStatusBar. This control is a modified version of TStatusBar.

ACKNOWLEDGMENT

Special thanks to:

• Rudi Loos <loos@intekom.co.za> for adding Color property to the status panels.

IMPROVEMENTS (in comparison with TStatusBar)

TStatusBarPro has the following new property in Delphi 4 or higher:

• Images: TCustomImageList
  Holds a list of bitmaps that can be displayed on the panels of the control.

TStatusBarPro has the following new properties in Delphi 3:

• Images: TImageList
  Holds a list of bitmaps that can be displayed on the panels of the control.
  
  
• Color: TColor
  Specifies the background color of the control.
  
  
• UseSystemFont: Boolean
  Specifies whether the status bar uses the system font.

Type of the following event has changed:

• OnDrawPanel: TDrawPanelProEvent
  TDrawPanelProEvent = procedure(StatusBar: TStatusBarPro; Panel: TStatusPanelPro; const Rect: TRect) of object
  Occurs when an owner draw panel needs to be redrawn.

Type of the following property has changed:

• Panels: TStatusPanelsPro
  Contains lists of the status bar's panels (TStatusPanelPro).

Each panel (TStatusPanelPro) has the following new properties:

• Color: TColor
  Specifies the background color of the panel.
  
  
• ImageIndex: Integer
  Determines index of the image (from the TStatusBarPro.Images) that appears on the panel.
  
  
• Hint: String
  Contains the text string that can appear when the user moves the mouse over the panel. If this property set to blank, hint property of TStatusBarPro will be used.
  
  
• PopupMenu: TPopupMenu
  Identifies the pop-up menu associated with the panel. If this property set to nil, PopupMenu property of TStatusBarPro will be used.

Each panel (TStatusPanelPro) has the following new events:

• OnClick: TNotifyEvent
  Occurs when the use click the panel. If this event is unassigned, the OnClick event of TStatusBarPro will be fired.
  
  
• OnDblClick: TNotifyEvent
  Occurs when the user double-clicks the primary mouse button when the mouse pointer is over the panel. If this event is unassigned, the OnDblClick event of TStatusBarPro will be fired.

HISTORY

• 1.11 (December 27, 2001)
  - Support of Delphi 6 added.
  
  
• 1.10 (September 24, 2000)
  - Color property added to TStatusPanelPro (Thanks to Rudi Loos).
  
  
• 1.00 (March 8, 2000)
  - Initial release.
  

LICENSE

TStatusBarPro component is freeware. You may copy component's files AS LONG AS YOU COPY ALL OF THEM. If you want to change the source code in order to improve the component's features, performance, etc. please send me the new source code so that I can have a look at it. The changed source code should contain descriptions what you have changed, and of course your name. The only thing you MAY NOT CHANGE is the ORIGINAL COPYRIGHT INFORMATION.

DISCLAIMER

TStatusBarPro is provided "AS IS" without any warranty of any kind, either express or implied. The entire risk as to the quality and performance of the software is with you. The author is NOT liable for any DAMAGES resulting from the use and misuse of the component, especially he is NOT liable for DAMAGES that were caused BY ANY VERSION WHICH HAS NOT BEEN PROGRAMMED BY THE AUTHOR HIMSELF.