2008-10-31 21:18:20 +00:00
|
|
|
object Form1: TForm1
|
|
|
|
Left = 237
|
|
|
|
Height = 243
|
|
|
|
Top = 152
|
|
|
|
Width = 288
|
2023-02-17 16:28:47 +00:00
|
|
|
HorzScrollBar.Page = 287
|
|
|
|
VertScrollBar.Page = 242
|
|
|
|
ActiveControl = MachineID
|
|
|
|
AutoSize = True
|
|
|
|
BorderStyle = bsDialog
|
|
|
|
Caption = ' Special Code Generator '
|
|
|
|
ClientHeight = 243
|
|
|
|
ClientWidth = 288
|
|
|
|
LCLVersion = '2.3.0.0'
|
2008-10-31 21:18:20 +00:00
|
|
|
object Label1: TLabel
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
|
|
|
AnchorSideTop.Control = MachineID
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
Left = 16
|
|
|
|
Height = 15
|
|
|
|
Top = 20
|
|
|
|
Width = 60
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Machine ID'
|
|
|
|
Color = clNone
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object GenBtn: TButton
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
2023-02-20 11:17:45 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideTop.Control = GroupBox1
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2023-02-20 11:17:45 +00:00
|
|
|
Left = 85
|
2023-02-17 16:28:47 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 161
|
|
|
|
Width = 96
|
|
|
|
BorderSpacing.Top = 16
|
2023-02-20 11:17:45 +00:00
|
|
|
BorderSpacing.Bottom = 8
|
2008-10-31 21:18:20 +00:00
|
|
|
BorderSpacing.InnerBorder = 4
|
|
|
|
Caption = 'Generate Code'
|
|
|
|
OnClick = GenBtnClick
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object MachineID: TEdit
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = Label1
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = Owner
|
|
|
|
AnchorSideRight.Control = GroupBox1
|
|
|
|
AnchorSideRight.Side = asrBottom
|
2023-02-20 11:17:45 +00:00
|
|
|
Left = 92
|
2023-02-17 16:28:47 +00:00
|
|
|
Height = 23
|
|
|
|
Top = 16
|
2023-02-20 11:17:45 +00:00
|
|
|
Width = 158
|
2023-02-17 16:28:47 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
2023-02-20 11:17:45 +00:00
|
|
|
BorderSpacing.Left = 16
|
2023-02-17 16:28:47 +00:00
|
|
|
BorderSpacing.Top = 16
|
2008-10-31 21:18:20 +00:00
|
|
|
MaxLength = 8
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object GroupBox1: TGroupBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
Left = 16
|
|
|
|
Height = 89
|
|
|
|
Top = 56
|
|
|
|
Width = 234
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Left = 16
|
|
|
|
BorderSpacing.Right = 16
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Features'
|
2023-02-17 16:28:47 +00:00
|
|
|
ClientHeight = 69
|
|
|
|
ClientWidth = 230
|
2008-10-31 21:18:20 +00:00
|
|
|
TabOrder = 2
|
|
|
|
object ReqFeat: TCheckBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
|
|
|
AnchorSideTop.Control = GroupBox1
|
|
|
|
Left = 32
|
|
|
|
Height = 19
|
|
|
|
Top = 0
|
|
|
|
Width = 65
|
|
|
|
BorderSpacing.Left = 32
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Required'
|
|
|
|
Checked = True
|
|
|
|
Enabled = False
|
|
|
|
State = cbChecked
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object HelpFeat: TCheckBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
|
|
|
AnchorSideTop.Control = ReqFeat
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 32
|
|
|
|
Height = 19
|
|
|
|
Top = 19
|
|
|
|
Width = 43
|
|
|
|
BorderSpacing.Left = 32
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Help'
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object ExamplesFeat: TCheckBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
|
|
|
AnchorSideTop.Control = HelpFeat
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 32
|
|
|
|
Height = 19
|
|
|
|
Top = 38
|
|
|
|
Width = 68
|
|
|
|
BorderSpacing.Left = 32
|
|
|
|
BorderSpacing.Bottom = 12
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Examples'
|
|
|
|
TabOrder = 2
|
|
|
|
end
|
|
|
|
object DBFeat: TCheckBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = ExamplesFeat
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = ReqFeat
|
|
|
|
Left = 132
|
|
|
|
Height = 19
|
|
|
|
Top = 0
|
|
|
|
Width = 66
|
|
|
|
BorderSpacing.Left = 32
|
|
|
|
BorderSpacing.Right = 32
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Database'
|
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
object FaxFeat: TCheckBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = ExamplesFeat
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = HelpFeat
|
|
|
|
Left = 132
|
|
|
|
Height = 19
|
|
|
|
Top = 19
|
|
|
|
Width = 36
|
|
|
|
BorderSpacing.Left = 32
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Fax'
|
|
|
|
TabOrder = 4
|
|
|
|
end
|
|
|
|
object GoodiesFeat: TCheckBox
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideLeft.Control = ExamplesFeat
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = ExamplesFeat
|
|
|
|
Left = 132
|
|
|
|
Height = 19
|
|
|
|
Top = 38
|
|
|
|
Width = 61
|
|
|
|
BorderSpacing.Left = 32
|
|
|
|
BorderSpacing.Right = 32
|
2008-10-31 21:18:20 +00:00
|
|
|
Caption = 'Goodies'
|
|
|
|
TabOrder = 5
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object CodeDisplay: TEdit
|
2023-02-20 11:17:45 +00:00
|
|
|
AnchorSideLeft.Control = GroupBox1
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideTop.Control = GenBtn
|
2023-02-20 11:17:45 +00:00
|
|
|
AnchorSideTop.Side = asrBottom
|
2023-02-17 16:28:47 +00:00
|
|
|
AnchorSideRight.Control = GroupBox1
|
|
|
|
AnchorSideRight.Side = asrBottom
|
2023-02-20 11:17:45 +00:00
|
|
|
Left = 16
|
2023-02-17 16:28:47 +00:00
|
|
|
Height = 23
|
2023-02-20 11:17:45 +00:00
|
|
|
Top = 194
|
|
|
|
Width = 234
|
2023-02-17 16:28:47 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
BorderSpacing.Bottom = 16
|
2008-10-31 21:18:20 +00:00
|
|
|
Color = clAqua
|
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
end
|