You've already forked lazarus-ccr
136 lines
2.8 KiB
Plaintext
136 lines
2.8 KiB
Plaintext
![]() |
object MainForm: TMainForm
|
||
|
Left = 409
|
||
|
Height = 448
|
||
|
Top = 218
|
||
|
Width = 613
|
||
|
HorzScrollBar.Page = 559
|
||
|
VertScrollBar.Page = 447
|
||
|
ActiveControl = ListBox1
|
||
|
Caption = 'Test SetTimer'
|
||
|
ClientHeight = 448
|
||
|
ClientWidth = 613
|
||
|
Position = poScreenCenter
|
||
|
LCLVersion = '1.1'
|
||
|
object ListBox1: TListBox
|
||
|
Left = 8
|
||
|
Height = 403
|
||
|
Top = 8
|
||
|
Width = 320
|
||
|
Anchors = [akTop, akLeft, akBottom]
|
||
|
ItemHeight = 0
|
||
|
ScrollWidth = 318
|
||
|
TabOrder = 0
|
||
|
TopIndex = -1
|
||
|
end
|
||
|
object Button1: TButton
|
||
|
Left = 240
|
||
|
Height = 30
|
||
|
Top = 414
|
||
|
Width = 88
|
||
|
Anchors = [akLeft, akBottom]
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Clear'
|
||
|
OnClick = Button1Click
|
||
|
TabOrder = 1
|
||
|
end
|
||
|
object SetTimer1Button: TButton
|
||
|
Left = 345
|
||
|
Height = 28
|
||
|
Top = 8
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Set Timer 1'
|
||
|
OnClick = SetTimer1ButtonClick
|
||
|
TabOrder = 2
|
||
|
end
|
||
|
object SetTimer2Button: TButton
|
||
|
Left = 345
|
||
|
Height = 28
|
||
|
Top = 48
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Set Timer 2'
|
||
|
OnClick = SetTimer2ButtonClick
|
||
|
TabOrder = 3
|
||
|
end
|
||
|
object SetTimer3Button: TButton
|
||
|
Left = 345
|
||
|
Height = 28
|
||
|
Top = 88
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Set Timer 3'
|
||
|
OnClick = SetTimer3ButtonClick
|
||
|
TabOrder = 4
|
||
|
end
|
||
|
object KillTimer1Button: TButton
|
||
|
Left = 481
|
||
|
Height = 28
|
||
|
Top = 8
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Kill'
|
||
|
OnClick = KillTimer1ButtonClick
|
||
|
TabOrder = 5
|
||
|
end
|
||
|
object KillTimer2Button: TButton
|
||
|
Left = 481
|
||
|
Height = 28
|
||
|
Top = 48
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Kill'
|
||
|
OnClick = KillTimer2ButtonClick
|
||
|
TabOrder = 6
|
||
|
end
|
||
|
object KillTimer3Button: TButton
|
||
|
Left = 481
|
||
|
Height = 60
|
||
|
Top = 88
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Kill'
|
||
|
OnClick = KillTimer3ButtonClick
|
||
|
TabOrder = 7
|
||
|
end
|
||
|
object SetTimer3bButton: TButton
|
||
|
Left = 345
|
||
|
Height = 28
|
||
|
Top = 120
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Set Timer 3b'
|
||
|
OnClick = SetTimer3bButtonClick
|
||
|
TabOrder = 8
|
||
|
end
|
||
|
object SetTimerDestroyButton: TButton
|
||
|
Left = 345
|
||
|
Height = 28
|
||
|
Top = 224
|
||
|
Width = 256
|
||
|
Caption = 'Set Timer and Destroy'
|
||
|
OnClick = SetTimerDestroyButtonClick
|
||
|
TabOrder = 9
|
||
|
end
|
||
|
object SetGlobalTimerButton: TButton
|
||
|
Left = 345
|
||
|
Height = 28
|
||
|
Top = 160
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Set Global Timer'
|
||
|
OnClick = SetGlobalTimerButtonClick
|
||
|
TabOrder = 10
|
||
|
end
|
||
|
object KillGlobalTimerButton1: TButton
|
||
|
Left = 481
|
||
|
Height = 28
|
||
|
Top = 160
|
||
|
Width = 120
|
||
|
BorderSpacing.InnerBorder = 4
|
||
|
Caption = 'Kill'
|
||
|
OnClick = KillGlobalTimerButton1Click
|
||
|
TabOrder = 11
|
||
|
end
|
||
|
end
|