lazarus/ide/condef.lfm
juha f36557e1c9 IDE: Improve Conditional Define GUI.
git-svn-id: trunk@42233 -
2013-07-30 09:14:43 +00:00

247 lines
5.6 KiB
Plaintext

object CondForm: TCondForm
Left = 305
Height = 326
Top = 265
Width = 356
ActiveControl = FirstTest
BorderIcons = [biSystemMenu]
Caption = 'Conditional Defines'
ClientHeight = 326
ClientWidth = 356
OnCreate = CondFormCREATE
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '1.1'
object NewTestGroupBox: TGroupBox
Left = 6
Height = 149
Top = 6
Width = 344
Align = alTop
AutoSize = True
BorderSpacing.Around = 6
Caption = 'NewTestGroupBox'
ClientHeight = 130
ClientWidth = 340
TabOrder = 0
object FirstLabel: TLabel
Left = 6
Height = 15
Top = 6
Width = 328
Align = alTop
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = '&First test'
ParentColor = False
end
object SecondLabel: TLabel
AnchorSideTop.Side = asrBottom
Left = 6
Height = 15
Top = 52
Width = 328
Align = alTop
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = '&Second test'
ParentColor = False
end
object FirstTest: TComboBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 25
Top = 21
Width = 328
Align = alTop
BorderSpacing.Left = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'MSWINDOWS'
'UNIX'
'LINUX'
'WIN32'
'CLX_'
'LCL_'
'VCL_'
'FPC'
'KYLIX'
'VER1_0'
)
OnChange = TestEditChange
TabOrder = 0
Text = 'MSWINDOWS'
end
object SecondTest: TComboBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 25
Top = 67
Width = 328
Align = alTop
BorderSpacing.Left = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'NONE'
'ELSE'
)
OnChange = TestEditChange
TabOrder = 1
Text = 'NONE'
end
object AddBtn: TBitBtn
AnchorSideTop.Control = SecondTest
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = AddInverse
Left = 85
Height = 26
Top = 98
Width = 75
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = '&Add'
Constraints.MinHeight = 25
Constraints.MinWidth = 75
OnClick = AddBtnClick
TabOrder = 2
end
object RemoveBtn: TBitBtn
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = SecondTest
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = NewTestGroupBox
AnchorSideRight.Side = asrBottom
Left = 259
Height = 26
Top = 98
Width = 75
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = '&Remove'
Constraints.MinHeight = 25
Constraints.MinWidth = 75
OnClick = RemoveBtnClick
TabOrder = 3
end
object AddInverse: TBitBtn
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = SecondTest
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = RemoveBtn
Left = 166
Height = 26
Top = 98
Width = 87
HelpType = htKeyword
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Add Inverse'
Constraints.MinHeight = 25
Constraints.MinWidth = 75
OnClick = AddInverseCLICK
TabOrder = 4
end
end
object ListBox: TListBox
Left = 6
Height = 113
Top = 161
Width = 344
Align = alClient
Anchors = [akTop, akBottom]
BorderSpacing.Around = 6
ItemHeight = 0
OnClick = ListBoxClick
OnDblClick = ListBoxDblClick
OnKeyDown = ListBoxKeyDown
TabOrder = 1
end
object ButtonPanel: TPanel
Left = 0
Height = 46
Top = 280
Width = 356
Align = alBottom
ClientHeight = 46
ClientWidth = 356
TabOrder = 2
object btnOk: TBitBtn
AnchorSideTop.Control = ButtonPanel
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = ButtonPanel
AnchorSideRight.Side = asrBottom
Left = 290
Height = 27
Top = 10
Width = 59
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Default = True
DefaultCaption = True
Kind = bkOK
ModalResult = 1
OnClick = OKButtonClick
TabOrder = 0
end
object btnSave: TBitBtn
AnchorSideTop.Control = btnOk
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = btnOk
Left = 219
Height = 26
Top = 10
Width = 65
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Right = 6
Caption = 'btnSave'
ModalResult = 6
OnClick = btnSaveClick
TabOrder = 1
end
object btmCancel: TBitBtn
AnchorSideTop.Control = btnSave
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = btnSave
Left = 123
Height = 33
Top = 7
Width = 90
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Right = 6
Cancel = True
DefaultCaption = True
Kind = bkCancel
ModalResult = 2
TabOrder = 2
end
object btnHelp: TBitBtn
AnchorSideLeft.Control = ButtonPanel
AnchorSideTop.Control = ButtonPanel
AnchorSideTop.Side = asrCenter
Left = 7
Height = 30
Top = 8
Width = 75
BorderSpacing.Around = 6
DefaultCaption = True
Kind = bkHelp
OnClick = HelpButtonClick
TabOrder = 3
end
end
end