1object DefinesGuiForm: TDefinesGuiForm
2  Left = 305
3  Height = 326
4  Top = 265
5  Width = 341
6  BorderIcons = [biSystemMenu]
7  Caption = 'Defines'
8  ClientHeight = 326
9  ClientWidth = 341
10  OnCreate = FormCreate
11  OnDestroy = FormDestroy
12  OnShow = FormShow
13  Position = poScreenCenter
14  LCLVersion = '1.5'
15  object gbNewDefine: TGroupBox
16    Left = 6
17    Height = 73
18    Top = 6
19    Width = 329
20    Align = alTop
21    AutoSize = True
22    BorderSpacing.Around = 6
23    Caption = 'gbNewDefine'
24    ClientHeight = 57
25    ClientWidth = 327
26    TabOrder = 0
27    object AddBtn: TBitBtn
28      AnchorSideTop.Control = RemoveBtn
29      AnchorSideRight.Control = RemoveBtn
30      Left = 165
31      Height = 27
32      Top = 27
33      Width = 75
34      Anchors = [akTop, akRight]
35      AutoSize = True
36      BorderSpacing.Right = 6
37      Caption = '&Add'
38      Constraints.MinHeight = 25
39      Constraints.MinWidth = 75
40      OnClick = AddBtnClick
41      TabOrder = 0
42    end
43    object RemoveBtn: TBitBtn
44      AnchorSideLeft.Side = asrBottom
45      AnchorSideTop.Control = edDefine
46      AnchorSideTop.Side = asrBottom
47      AnchorSideRight.Control = edDefine
48      AnchorSideRight.Side = asrBottom
49      Left = 246
50      Height = 27
51      Top = 27
52      Width = 75
53      Anchors = [akTop, akRight]
54      AutoSize = True
55      BorderSpacing.Top = 6
56      BorderSpacing.Bottom = 3
57      Caption = '&Remove'
58      Constraints.MinHeight = 25
59      Constraints.MinWidth = 75
60      OnClick = RemoveBtnClick
61      TabOrder = 1
62    end
63    object edDefine: TEdit
64      AnchorSideTop.Side = asrBottom
65      Left = 6
66      Height = 21
67      Top = 0
68      Width = 315
69      Align = alTop
70      BorderSpacing.Left = 6
71      BorderSpacing.Right = 6
72      BorderSpacing.Bottom = 6
73      OnChange = EditChange
74      TabOrder = 2
75    end
76  end
77  object DefinesCheckList: TCheckListBox
78    Left = 6
79    Height = 187
80    Top = 85
81    Width = 329
82    Align = alClient
83    Anchors = [akTop, akBottom]
84    BorderSpacing.Around = 6
85    ItemHeight = 0
86    OnClick = DefinesCheckListClick
87    OnDblClick = DefinesCheckListDblClick
88    OnKeyDown = DefinesCheckListKeyDown
89    TabOrder = 1
90    TopIndex = -1
91  end
92  object ButtonPanel: TButtonPanel
93    Left = 6
94    Height = 42
95    Top = 278
96    Width = 329
97    OKButton.Name = 'OKButton'
98    OKButton.DefaultCaption = True
99    HelpButton.Name = 'HelpButton'
100    HelpButton.DefaultCaption = True
101    HelpButton.OnClick = HelpButtonClick
102    CloseButton.Name = 'CloseButton'
103    CloseButton.DefaultCaption = True
104    CancelButton.Name = 'CancelButton'
105    CancelButton.DefaultCaption = True
106    TabOrder = 2
107    ShowButtons = [pbOK, pbCancel, pbHelp]
108  end
109end
110