Files
2018-06-22 06:07:02 +00:00

72 lines
1.6 KiB
Plaintext

object Form1: TForm1
Left = 600
Height = 344
Top = 231
Width = 474
Caption = 'Form1'
ClientHeight = 344
ClientWidth = 474
OnCreate = RxSwitch1Off
LCLVersion = '1.9.0.0'
object RxSwitch1: TRxSwitch
Left = 40
Height = 84
Top = 16
Width = 98
Caption = 'RxSwitch1'
TabOrder = 0
TextPosition = tpAbove
Style = swsClassic
OnOn = RxSwitch1Off
OnOff = RxSwitch1Off
end
object Label1: TLabel
AnchorSideLeft.Control = RxSwitch1
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = RxSwitch1
AnchorSideTop.Side = asrBottom
Left = 68
Height = 20
Top = 100
Width = 42
Caption = 'Label1'
ParentColor = False
end
object RadioGroup1: TRadioGroup
Left = 216
Height = 117
Top = 16
Width = 161
AutoFill = True
AutoSize = True
Caption = 'Style'
ChildSizing.LeftRightSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 96
ClientWidth = 159
ItemIndex = 0
Items.Strings = (
'swsClassic'
'swsNewHorizontal'
'swsVerticalUD'
'swsVerticalDU'
)
OnClick = RadioGroup1Click
TabOrder = 1
end
object RxSwitch2: TRxSwitch
Left = 40
Height = 60
Top = 200
Width = 50
Caption = 'RxSwitch2'
TabOrder = 2
Style = swsClassic
end
end