Files
lazarus-ccr/components/industrialstuff/Example/AdvLED/main.lfm

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