2008-10-31 21:18:20 +00:00
|
|
|
object Form1: TForm1
|
|
|
|
Left = 324
|
|
|
|
Height = 158
|
|
|
|
Top = 260
|
|
|
|
Width = 229
|
2023-02-20 11:17:45 +00:00
|
|
|
BorderStyle = bsDialog
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Form1'
|
2009-07-28 13:17:46 +00:00
|
|
|
ClientHeight = 158
|
|
|
|
ClientWidth = 229
|
|
|
|
OnCreate = FormCreate
|
2008-10-31 21:18:20 +00:00
|
|
|
Position = poScreenCenter
|
2023-02-17 16:28:47 +00:00
|
|
|
LCLVersion = '2.3.0.0'
|
2023-02-20 11:17:45 +00:00
|
|
|
object lblDaysRemaining: TLabel
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
2023-02-20 11:17:45 +00:00
|
|
|
AnchorSideTop.Control = Info
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 69
|
|
|
|
Height = 15
|
2023-02-20 11:17:45 +00:00
|
|
|
Top = 58
|
2023-02-17 16:28:47 +00:00
|
|
|
Width = 91
|
2008-10-31 21:18:20 +00:00
|
|
|
Alignment = taCenter
|
2023-02-20 11:17:45 +00:00
|
|
|
BorderSpacing.Top = 16
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Days Remaining: '
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object CloseBtn: TBitBtn
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
2023-02-20 11:17:45 +00:00
|
|
|
AnchorSideTop.Control = Bevel1
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideTop.Side = asrBottom
|
2023-02-20 11:17:45 +00:00
|
|
|
Left = 91
|
|
|
|
Height = 26
|
|
|
|
Top = 104
|
|
|
|
Width = 46
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Top = 12
|
2023-02-17 16:28:47 +00:00
|
|
|
BorderSpacing.Bottom = 12
|
2008-10-31 21:18:20 +00:00
|
|
|
Kind = bkClose
|
2023-02-17 16:28:47 +00:00
|
|
|
TabOrder = 0
|
|
|
|
end
|
2023-02-20 11:17:45 +00:00
|
|
|
object Info: TLabel
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideTop.Control = Owner
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
Left = 12
|
|
|
|
Height = 30
|
|
|
|
Top = 12
|
|
|
|
Width = 205
|
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
BorderSpacing.Around = 12
|
|
|
|
Caption = 'If you can edit this, then your program was allowed to run'
|
|
|
|
WordWrap = True
|
2008-10-31 21:18:20 +00:00
|
|
|
end
|
2023-02-20 11:17:45 +00:00
|
|
|
object Bevel1: TBevel
|
|
|
|
AnchorSideLeft.Control = Info
|
|
|
|
AnchorSideTop.Control = lblDaysRemaining
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = Info
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
Left = 12
|
|
|
|
Height = 3
|
|
|
|
Top = 89
|
|
|
|
Width = 205
|
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
BorderSpacing.Top = 16
|
|
|
|
Shape = bsTopLine
|
|
|
|
end
|
2008-10-31 21:18:20 +00:00
|
|
|
object OgDaysCode1: TOgDaysCode
|
|
|
|
OnChecked = OgDaysCode1Checked
|
|
|
|
OnGetKey = OgDaysCode1GetKey
|
|
|
|
OnGetCode = OgDaysCode1GetCode
|
|
|
|
OnChangeCode = OgDaysCode1ChangeCode
|
2023-02-17 16:28:47 +00:00
|
|
|
Left = 40
|
|
|
|
Top = 88
|
2008-10-31 21:18:20 +00:00
|
|
|
end
|
|
|
|
end
|