1object BuildModesForm: TBuildModesForm
2  Left = 396
3  Height = 354
4  Top = 484
5  Width = 612
6  ActiveControl = BuildModesStringGrid
7  BorderIcons = [biSystemMenu]
8  Caption = 'BuildModesForm'
9  ClientHeight = 354
10  ClientWidth = 612
11  OnCreate = FormCreate
12  OnDestroy = FormDestroy
13  OnShow = FormShow
14  Position = poScreenCenter
15  LCLVersion = '2.1.0.0'
16  object ButtonPanel1: TButtonPanel
17    Left = 6
18    Height = 26
19    Top = 322
20    Width = 600
21    OKButton.Name = 'OKButton'
22    OKButton.DefaultCaption = True
23    HelpButton.Name = 'HelpButton'
24    HelpButton.DefaultCaption = True
25    CloseButton.Name = 'CloseButton'
26    CloseButton.DefaultCaption = True
27    CancelButton.Name = 'CancelButton'
28    CancelButton.DefaultCaption = True
29    TabOrder = 4
30    ShowButtons = [pbOK, pbCancel, pbHelp]
31    ShowBevel = False
32  end
33  object ToolBar1: TToolBar
34    AnchorSideLeft.Control = btnCreateDefaultModes
35    AnchorSideTop.Control = btnCreateDefaultModes
36    AnchorSideTop.Side = asrBottom
37    Left = 6
38    Height = 28
39    Top = 37
40    Width = 154
41    Align = alNone
42    BorderSpacing.Top = 6
43    ButtonHeight = 26
44    ButtonWidth = 26
45    Caption = 'ToolBar1'
46    EdgeBorders = []
47    EdgeInner = esNone
48    EdgeOuter = esNone
49    ParentShowHint = False
50    ShowHint = True
51    TabOrder = 1
52    object ToolButtonAdd: TToolButton
53      Left = 1
54      Top = 0
55      Caption = 'ToolButtonAdd'
56      OnClick = AddSpeedButtonClick
57    end
58    object ToolButtonDelete: TToolButton
59      Left = 27
60      Top = 0
61      Caption = 'ToolButtonDelete'
62      OnClick = DeleteSpeedButtonClick
63    end
64    object ToolButtonMoveUp: TToolButton
65      Left = 58
66      Top = 0
67      Caption = 'ToolButtonMoveUp'
68      OnClick = MoveUpSpeedButtonClick
69    end
70    object ToolButtonMoveDown: TToolButton
71      Left = 84
72      Top = 0
73      Caption = 'ToolButtonMoveDown'
74      OnClick = MoveDownSpeedButtonClick
75    end
76    object ToolButton5: TToolButton
77      Left = 110
78      Height = 26
79      Top = 0
80      Caption = 'ToolButton5'
81      Style = tbsDivider
82    end
83    object ToolButtonDiff: TToolButton
84      Left = 115
85      Top = 0
86      Caption = 'ToolButtonDiff'
87      OnClick = DiffSpeedButtonClick
88    end
89    object ToolButton1: TToolButton
90      Left = 53
91      Height = 26
92      Top = 0
93      Caption = 'ToolButton1'
94      Style = tbsDivider
95    end
96  end
97  object NoteLabel: TLabel
98    AnchorSideLeft.Control = ToolBar1
99    AnchorSideLeft.Side = asrBottom
100    AnchorSideTop.Control = ToolBar1
101    AnchorSideTop.Side = asrCenter
102    Left = 166
103    Height = 15
104    Top = 44
105    Width = 55
106    BorderSpacing.Left = 6
107    Caption = 'NoteLabel'
108    Font.Color = clMaroon
109    Font.Style = [fsItalic]
110    ParentColor = False
111    ParentFont = False
112  end
113  object BuildModesStringGrid: TStringGrid
114    AnchorSideLeft.Control = ToolBar1
115    AnchorSideTop.Control = ToolBar1
116    AnchorSideTop.Side = asrBottom
117    Left = 6
118    Height = 244
119    Top = 71
120    Width = 602
121    Anchors = [akTop, akLeft, akRight, akBottom]
122    AutoFillColumns = True
123    BorderSpacing.Top = 6
124    ColCount = 3
125    Columns = <
126      item
127        ButtonStyle = cbsCheckboxColumn
128        MaxSize = 50
129        Title.Caption = 'Active'
130        Width = 200
131      end
132      item
133        ButtonStyle = cbsCheckboxColumn
134        MaxSize = 50
135        Title.Caption = 'InSession'
136        Width = 200
137      end
138      item
139        MaxSize = 500
140        SizePriority = 100
141        Title.Caption = 'Title'
142        Width = 200
143      end>
144    FixedCols = 0
145    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing, goRowSelect, goThumbTracking, goSmoothScroll]
146    TabOrder = 3
147    TitleStyle = tsNative
148    OnCheckboxToggled = BuildModesCheckboxToggled
149    OnDrawCell = BuildModesStringGridDrawCell
150    OnSelection = BuildModesStringGridSelection
151    OnValidateEntry = BuildModesStringGridValidateEntry
152    ColWidths = (
153      200
154      200
155      200
156    )
157  end
158  object btnCreateDefaultModes: TButton
159    AnchorSideLeft.Control = Owner
160    AnchorSideTop.Control = Owner
161    Left = 6
162    Height = 25
163    Top = 6
164    Width = 166
165    AutoSize = True
166    BorderSpacing.Left = 6
167    BorderSpacing.Top = 6
168    Caption = 'Create now for this project'
169    OnClick = btnCreateDefaultModesClick
170    ParentShowHint = False
171    ShowHint = True
172    TabOrder = 0
173  end
174  object RenameButton: TButton
175    AnchorSideTop.Control = btnCreateDefaultModes
176    AnchorSideRight.Control = BuildModesStringGrid
177    AnchorSideRight.Side = asrBottom
178    Left = 539
179    Height = 25
180    Top = 6
181    Width = 69
182    Anchors = [akTop, akRight]
183    AutoSize = True
184    Caption = '&Rename'
185    OnClick = RenameButtonClick
186    TabOrder = 2
187  end
188  object BuildModesPopupMenu: TPopupMenu
189    left = 168
190    top = 260
191  end
192end
193