Other then the “normal” Statusbar, the TsStatusBar can hold Controls such as Buttons. Handy!
I'd like to display a Progressbar that is on the right side of the Form. So I set the Anchor to [akTop,akRight]
Funny: The progressbar doesn't react when the Window is resized, it remains on the same position.
Code:
object StatusBar1: TsStatusBar
Left = 0
Top = 459
Width = 649
Height = 19
Panels = <>
SkinData.SkinSection = 'STATUSBAR'
object ProgressBar1: TProgressBar
Left = 470
Top = 3
Width = 150
Height = 16
Anchors = [akTop, akRight]
TabOrder = 0
end
end
Place that on a form any you'll see – when resizing the form the progressbar stays where it originally was.