Unit 'ComCtrls' Package
[Overview][Constants][Types][Classes][Procedures and functions][Index] [#lcl]

TStatusPanel

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Implements a panel displayed in TStatusBar.

Declaration

Source position: comctrls.pp line 62

type TStatusPanel = class(TCollectionItem)

protected

  FIntfFlag: Integer;

  

Field used by Widgetset classes. Do not use it in the LCL.

  function GetDisplayName; override;

  

Gets the value displayed as the name for the collection item.

  procedure PanelChanged();

  

PanelChanged - method for dealing with a status panel, one or more of whose parts has changed.

  procedure SetIndex(); override;

  

SetIndex saves the old index value, checks that the supplied value is different and then calls inherited method.

public

  constructor Create(); override;

  

Create - constructor for TStatusPanel: sets default width, alignment and bevel, calls inherited Create and loads into StatusBar.

  destructor Destroy; override;

  

Destroy - destructor for TStatusPanel: calls inherited Destroy and removes itself from the StatusBar.

  procedure Assign(); override;

  

Assign copies text, width, alignment, bevel and style properties from Source if it is of correct type, otherwise calls inherited Assign (which will probably raise an exception).

  function StatusBar;

  

The StatusBar that contains this StatusPanel

published

  property Alignment: TAlignment; [rw]

  

Alignment - whether left- or right-justified or centered.

  property Bevel: TStatusPanelBevel; [rw]

  

The type of Bevel for the display.

  property BidiMode: TBiDiMode; [rw]

  

Introduces BiDiMode support not present in the ancestor class.

  property ParentBiDiMode: Boolean; [rw]

  

Introduces BiDiMode support not present in the ancestor class.

  property Style: TStatusPanelStyle; [rw]

  

Style - whether text or something drawn by the owner.

  property Text: TCaption; [rw]

  

Text - the string for display in the StatusBar.

  property Width: Integer; [rw]

  

The Width of this panel on the StatusBar.

end;

Inheritance

TStatusPanel

  

Implements a panel displayed in TStatusBar.

|

TObject

Description

TStatusPanel is a TCollectionItem descendant which implements panels used in TStatusBar. Instances of the class are created by and stored in a TStatusPanels collection in a TStatusBar control. Use the properties in the panel to control its appearance, size, and textual content.

See also

TStatusBar.Panels

  

Collection with the TStatusPanel instances defined for the control.

TStatusPanels

  

TStatusPanels - the collection of Status Panels in this StatusBar.