You've already forked lazarus-ccr
56 lines
1.2 KiB
Plaintext
56 lines
1.2 KiB
Plaintext
|
object Form1: TForm1
|
||
|
|
Left = 338
|
||
|
|
Height = 178
|
||
|
|
Top = 128
|
||
|
|
Width = 268
|
||
|
|
Caption = 'Form1'
|
||
|
|
ClientHeight = 178
|
||
|
|
ClientWidth = 268
|
||
|
|
LCLVersion = '2.3.0.0'
|
||
|
|
object Button1: TButton
|
||
|
|
Left = 128
|
||
|
|
Height = 25
|
||
|
|
Top = 128
|
||
|
|
Width = 101
|
||
|
|
AutoSize = True
|
||
|
|
Caption = 'Flash (100 ms)'
|
||
|
|
Enabled = False
|
||
|
|
OnClick = Button1Click
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object AdvLed1: TAdvLed
|
||
|
|
Left = 56
|
||
|
|
Height = 24
|
||
|
|
Top = 64
|
||
|
|
Width = 24
|
||
|
|
State = lsDisabled
|
||
|
|
Blink = False
|
||
|
|
end
|
||
|
|
object RadioGroup1: TRadioGroup
|
||
|
|
Left = 128
|
||
|
|
Height = 100
|
||
|
|
Top = 16
|
||
|
|
Width = 112
|
||
|
|
AutoFill = True
|
||
|
|
Caption = 'State'
|
||
|
|
ChildSizing.LeftRightSpacing = 6
|
||
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
||
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||
|
|
ChildSizing.ControlsPerLine = 1
|
||
|
|
ClientHeight = 80
|
||
|
|
ClientWidth = 108
|
||
|
|
ItemIndex = 0
|
||
|
|
Items.Strings = (
|
||
|
|
'disabled'
|
||
|
|
'off'
|
||
|
|
'on'
|
||
|
|
'blink (500 ms)'
|
||
|
|
)
|
||
|
|
OnClick = RadioGroup1Click
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
end
|