106 lines
1.9 KiB
Plaintext
106 lines
1.9 KiB
Plaintext
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
|