lazarus-ccr/components/longtimer/demo/umainform.lfm
gbamber b741fd8d06 Initial commit v0.0.1
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3519 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2014-09-03 11:29:58 +00:00

160 lines
3.2 KiB
Plaintext

object mainform: Tmainform
Left = 1162
Height = 264
Top = 272
Width = 437
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Application Title'
ClientHeight = 264
ClientWidth = 437
DefaultMonitor = dmPrimary
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '1.2.4.0'
object cmd_Close: TBitBtn
Left = 104
Height = 30
Top = 224
Width = 75
DefaultCaption = True
Kind = bkClose
ModalResult = 11
TabOrder = 0
end
object memo_ReportTimerEvent: TMemo
Left = 192
Height = 240
Top = 8
Width = 232
Lines.Strings = (
'Memo1'
)
TabOrder = 1
end
object cmd_StopTimer: TButton
Left = 16
Height = 25
Top = 197
Width = 75
Caption = 'Stop Timer'
OnClick = cmd_StopTimerClick
TabOrder = 2
end
object cmd_StartTimer: TButton
Left = 104
Height = 25
Top = 197
Width = 75
Caption = 'Start Timer'
OnClick = cmd_StartTimerClick
TabOrder = 3
end
object crp_SetTimer: TGroupBox
Left = 8
Height = 176
Top = 8
Width = 184
Caption = 'Set up LongTimer'
ClientHeight = 158
ClientWidth = 180
TabOrder = 4
object Label1: TLabel
Left = 16
Height = 15
Top = 16
Width = 28
Caption = 'Every'
ParentColor = False
end
object cmb_IntervalType: TComboBox
Left = 72
Height = 23
Top = 16
Width = 100
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'Day'
'Week'
'Month'
)
OnChange = cmb_IntervalTypeChange
Style = csDropDownList
TabOrder = 0
Text = 'Day'
end
object Label3: TLabel
Left = 0
Height = 15
Top = 48
Width = 61
Caption = 'Day or Date'
ParentColor = False
end
object cmb_weekordate: TComboBox
Left = 72
Height = 23
Top = 44
Width = 100
Enabled = False
ItemHeight = 15
OnChange = cmb_weekordateChange
Style = csDropDownList
TabOrder = 1
end
object Label2: TLabel
Left = 0
Height = 15
Top = 88
Width = 61
Caption = 'Time (24hr)'
ParentColor = False
end
object cmb_Daily24Hour: TComboBox
Left = 72
Height = 23
Top = 88
Width = 100
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'Midnight'
)
OnChange = cmb_Daily24HourChange
Style = csDropDownList
TabOrder = 2
Text = 'Midnight'
end
object cmb_SampleInterval: TComboBox
Left = 48
Height = 23
Top = 128
Width = 124
ItemHeight = 15
OnChange = cmb_SampleIntervalChange
Style = csDropDownList
TabOrder = 3
end
object Label4: TLabel
Left = 0
Height = 15
Top = 128
Width = 39
Caption = 'Sample'
ParentColor = False
end
end
object LongTimer1: TLongTimer
Enabled = False
OnTimer = LongTimer1Timer
OnStartTimer = LongTimer1StartTimer
OnStopTimer = LongTimer1StopTimer
IntervalType = lt3Monthly
Daily24Hour = 10
WeeklyDay = lt3Wednesday
left = 8
top = 8
end
end