1
0
lazarus-tutorials/statusbar_demo/statusbar_form.lfm

106 lines
1.9 KiB
Plaintext
Raw Permalink Normal View History

2021-10-08 17:15:28 -04:00
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