object Form1: TForm1 Left = 476 Height = 240 Top = 228 Width = 400 Caption = 'StatusBar demonstration' ClientHeight = 240 ClientWidth = 400 LCLVersion = '2.0.12.0' object statusbar: TStatusBar Left = 0 Height = 23 Top = 217 Width = 400 Panels = < item Width = 110 end item Width = 110 end item Width = 90 end item Width = 90 end> SimplePanel = False end object Label1: TLabel Left = 8 Height = 15 Top = 8 Width = 34 Caption = 'Label1' ParentColor = False OnMouseMove = MouseMove end object CheckBox1: TCheckBox Left = 312 Height = 19 Top = 8 Width = 79 Caption = 'CheckBox1' OnMouseMove = MouseMove TabOrder = 1 end object ProgressBar1: TProgressBar Left = 8 Height = 20 Top = 72 Width = 100 OnMouseMove = MouseMove TabOrder = 2 end object SpinEdit1: TSpinEdit Left = 304 Height = 23 Top = 140 Width = 87 OnMouseMove = MouseMove TabOrder = 3 end object ButtonPanel1: TButtonPanel Left = 6 Height = 34 Top = 177 Width = 388 OKButton.Name = 'OKButton' OKButton.DefaultCaption = True HelpButton.Name = 'HelpButton' HelpButton.DefaultCaption = True CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CancelButton.Name = 'CancelButton' CancelButton.DefaultCaption = True TabOrder = 4 OnMouseMove = MouseMove end object Bevel1: TBevel Left = 341 Height = 50 Top = 42 Width = 50 OnMouseMove = MouseMove end object BitBtn1: TBitBtn Left = 8 Height = 30 Top = 133 Width = 75 Caption = 'BitBtn1' OnMouseMove = MouseMove TabOrder = 5 end object Edit1: TEdit Left = 184 Height = 23 Top = 69 Width = 80 OnMouseMove = MouseMove TabOrder = 6 Text = 'Edit1' end end