mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-15 14:29:31 +02:00
ideintf: reanchor checkgroupeditor controls, use buttonpanel
git-svn-id: trunk@19738 -
This commit is contained in:
paul
parent
4167e49626
commit
45d2c14cd3
@ -3,29 +3,40 @@ object CheckGroupEditorDlg: TCheckGroupEditorDlg
|
||||
Height = 300
|
||||
Top = 195
|
||||
Width = 608
|
||||
HorzScrollBar.Page = 607
|
||||
VertScrollBar.Page = 299
|
||||
BorderIcons = [biSystemMenu]
|
||||
BorderStyle = bsDialog
|
||||
Caption = 'CheckGroupEditorDlg'
|
||||
ClientHeight = 300
|
||||
ClientWidth = 608
|
||||
OnCreate = FormCreate
|
||||
LCLVersion = '0.9.25'
|
||||
LCLVersion = '0.9.27'
|
||||
object ColumnsLabel: TLabel
|
||||
Left = 369
|
||||
AnchorSideLeft.Control = FCheck
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = DuplicateCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 372
|
||||
Height = 14
|
||||
Top = 80
|
||||
Top = 71
|
||||
Width = 66
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'ColumnsLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
object FCheck: TCheckGroup
|
||||
Height = 236
|
||||
Top = 26
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = ToolBar
|
||||
AnchorSideBottom.Control = BtnPanel
|
||||
Left = 6
|
||||
Height = 230
|
||||
Top = 32
|
||||
Width = 360
|
||||
Align = alLeft
|
||||
AutoFill = True
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Bottom = 6
|
||||
Caption = 'FCheck'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
@ -39,135 +50,65 @@ object CheckGroupEditorDlg: TCheckGroupEditorDlg
|
||||
PopupMenu = FPopupMenu
|
||||
TabOrder = 0
|
||||
end
|
||||
object FPanelOKCancel: TPanel
|
||||
Height = 38
|
||||
Top = 262
|
||||
Width = 608
|
||||
Align = alBottom
|
||||
AutoSize = True
|
||||
BevelInner = bvLowered
|
||||
ClientHeight = 38
|
||||
ClientWidth = 608
|
||||
TabOrder = 1
|
||||
object BtnHelp: TBitBtn
|
||||
AnchorSideTop.Control = FPanelOKCancel
|
||||
AnchorSideRight.Control = FPanelOKCancel
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = FPanelOKCancel
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 512
|
||||
Height = 26
|
||||
Top = 6
|
||||
Width = 90
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
Caption = '&Help'
|
||||
Constraints.MinWidth = 90
|
||||
Kind = bkHelp
|
||||
NumGlyphs = 0
|
||||
TabOrder = 0
|
||||
end
|
||||
object BtnApply: TBitBtn
|
||||
AnchorSideTop.Control = FPanelOKCancel
|
||||
AnchorSideRight.Control = BtnHelp
|
||||
AnchorSideBottom.Control = FPanelOKCancel
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 416
|
||||
Height = 26
|
||||
Top = 6
|
||||
Width = 90
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
Caption = '&Apply'
|
||||
Constraints.MinWidth = 90
|
||||
NumGlyphs = 0
|
||||
OnClick = ApplyCheck
|
||||
TabOrder = 1
|
||||
end
|
||||
object BtnCancel: TBitBtn
|
||||
AnchorSideTop.Control = FPanelOKCancel
|
||||
AnchorSideRight.Control = BtnApply
|
||||
AnchorSideBottom.Control = FPanelOKCancel
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 320
|
||||
Height = 26
|
||||
Top = 6
|
||||
Width = 90
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'Cancel'
|
||||
Constraints.MinWidth = 90
|
||||
Kind = bkCancel
|
||||
ModalResult = 2
|
||||
NumGlyphs = 0
|
||||
TabOrder = 2
|
||||
end
|
||||
object BtnOK: TBitBtn
|
||||
AnchorSideTop.Control = FPanelOKCancel
|
||||
AnchorSideRight.Control = BtnCancel
|
||||
AnchorSideBottom.Control = FPanelOKCancel
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 224
|
||||
Height = 26
|
||||
Top = 6
|
||||
Width = 90
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
Caption = '&OK'
|
||||
Constraints.MinWidth = 90
|
||||
Default = True
|
||||
Kind = bkOK
|
||||
ModalResult = 1
|
||||
NumGlyphs = 0
|
||||
TabOrder = 3
|
||||
end
|
||||
end
|
||||
object DuplicateCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = FCheck
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = FCheck
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 368
|
||||
Height = 19
|
||||
Left = 372
|
||||
Height = 17
|
||||
Top = 48
|
||||
Width = 234
|
||||
Width = 230
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 16
|
||||
BorderSpacing.Right = 6
|
||||
Caption = 'DuplicateCheckBox'
|
||||
Checked = True
|
||||
State = cbChecked
|
||||
TabOrder = 2
|
||||
TabOrder = 1
|
||||
end
|
||||
object ColumnsEdit: TEdit
|
||||
Left = 368
|
||||
AnchorSideLeft.Control = ColumnsLabel
|
||||
AnchorSideTop.Control = ColumnsLabel
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 375
|
||||
Height = 23
|
||||
Top = 97
|
||||
Top = 88
|
||||
Width = 34
|
||||
BorderSpacing.Left = 3
|
||||
BorderSpacing.Top = 3
|
||||
Color = clBtnFace
|
||||
OnChange = ColumnsEditChange
|
||||
OnKeyDown = nil
|
||||
ReadOnly = True
|
||||
TabOrder = 3
|
||||
TabOrder = 2
|
||||
Text = '1'
|
||||
end
|
||||
object ColumnsUpDown: TUpDown
|
||||
Left = 402
|
||||
AnchorSideLeft.Control = ColumnsEdit
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ColumnsEdit
|
||||
AnchorSideBottom.Control = ColumnsEdit
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 409
|
||||
Height = 23
|
||||
Top = 97
|
||||
Top = 88
|
||||
Width = 17
|
||||
Anchors = [akTop, akLeft, akBottom]
|
||||
Associate = ColumnsEdit
|
||||
Min = 1
|
||||
Position = 1
|
||||
TabOrder = 4
|
||||
TabOrder = 3
|
||||
Wrap = False
|
||||
end
|
||||
object ToolBar: TToolBar
|
||||
Left = 0
|
||||
Height = 26
|
||||
Top = 0
|
||||
Width = 608
|
||||
Caption = 'ToolBar'
|
||||
Flat = True
|
||||
TabOrder = 5
|
||||
TabOrder = 4
|
||||
object tbAdd: TToolButton
|
||||
Left = 1
|
||||
Top = 2
|
||||
@ -232,8 +173,17 @@ object CheckGroupEditorDlg: TCheckGroupEditorDlg
|
||||
Caption = 'LabelDisable'
|
||||
Font.Color = clHotLight
|
||||
ParentColor = False
|
||||
ParentFont = False
|
||||
end
|
||||
end
|
||||
object BtnPanel: TButtonPanel
|
||||
Left = 6
|
||||
Height = 26
|
||||
Top = 268
|
||||
Width = 596
|
||||
TabOrder = 5
|
||||
ShowBevel = False
|
||||
end
|
||||
object FPopupMenu: TPopupMenu
|
||||
OnPopup = CreateItems
|
||||
left = 480
|
||||
|
||||
@ -2,148 +2,61 @@
|
||||
|
||||
LazarusResources.Add('TCheckGroupEditorDlg','FORMDATA',[
|
||||
'TPF0'#20'TCheckGroupEditorDlg'#19'CheckGroupEditorDlg'#4'Left'#3#138#1#6'Hei'
|
||||
+'ght'#3','#1#3'Top'#3#195#0#5'Width'#3'`'#2#18'HorzScrollBar.Page'#3'_'#2#18
|
||||
+'VertScrollBar.Page'#3'+'#1#11'BorderIcons'#11#12'biSystemMenu'#0#11'BorderS'
|
||||
+'tyle'#7#8'bsDialog'#7'Caption'#6#19'CheckGroupEditorDlg'#12'ClientHeight'#3
|
||||
+','#1#11'ClientWidth'#3'`'#2#8'OnCreate'#7#10'FormCreate'#10'LCLVersion'#6#6
|
||||
+'0.9.25'#0#6'TLabel'#12'ColumnsLabel'#4'Left'#3'q'#1#6'Height'#2#14#3'Top'#2
|
||||
+'P'#5'Width'#2'B'#7'Caption'#6#12'ColumnsLabel'#11'ParentColor'#8#0#0#11'TCh'
|
||||
+'eckGroup'#6'FCheck'#6'Height'#3#236#0#3'Top'#2#26#5'Width'#3'h'#1#5'Align'#7
|
||||
+#6'alLeft'#8'AutoFill'#9#7'Caption'#6#6'FCheck'#28'ChildSizing.LeftRightSpac'
|
||||
+'ing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizon'
|
||||
+'tal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'cr'
|
||||
+'sHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChild'
|
||||
+'s'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layou'
|
||||
+'t'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1
|
||||
+#11'OnItemClick'#7#9'ItemClick'#9'PopupMenu'#7#10'FPopupMenu'#8'TabOrder'#2#0
|
||||
+#0#0#6'TPanel'#14'FPanelOKCancel'#6'Height'#2'&'#3'Top'#3#6#1#5'Width'#3'`'#2
|
||||
+#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'BevelInner'#7#9'bvLowered'#12'Clien'
|
||||
+'tHeight'#2'&'#11'ClientWidth'#3'`'#2#8'TabOrder'#2#1#0#7'TBitBtn'#7'BtnHelp'
|
||||
+#21'AnchorSideTop.Control'#7#14'FPanelOKCancel'#23'AnchorSideRight.Control'#7
|
||||
+#14'FPanelOKCancel'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBot'
|
||||
+'tom.Control'#7#14'FPanelOKCancel'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
|
||||
+'Left'#3#0#2#6'Height'#2#26#3'Top'#2#6#5'Width'#2'Z'#7'Anchors'#11#5'akTop'#7
|
||||
+'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'
|
||||
+#6#5'&Help'#20'Constraints.MinWidth'#2'Z'#4'Kind'#7#6'bkHelp'#9'NumGlyphs'#2
|
||||
+#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#8'BtnApply'#21'AnchorSideTop.Control'#7#14
|
||||
+'FPanelOKCancel'#23'AnchorSideRight.Control'#7#7'BtnHelp'#24'AnchorSideBotto'
|
||||
+'m.Control'#7#14'FPanelOKCancel'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
|
||||
+'Left'#3#160#1#6'Height'#2#26#3'Top'#2#6#5'Width'#2'Z'#7'Anchors'#11#5'akTop'
|
||||
+#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Capti'
|
||||
+'on'#6#6'&Apply'#20'Constraints.MinWidth'#2'Z'#9'NumGlyphs'#2#0#7'OnClick'#7
|
||||
+#10'ApplyCheck'#8'TabOrder'#2#1#0#0#7'TBitBtn'#9'BtnCancel'#21'AnchorSideTop'
|
||||
+'.Control'#7#14'FPanelOKCancel'#23'AnchorSideRight.Control'#7#8'BtnApply'#24
|
||||
+'AnchorSideBottom.Control'#7#14'FPanelOKCancel'#21'AnchorSideBottom.Side'#7#9
|
||||
+'asrBottom'#4'Left'#3'@'#1#6'Height'#2#26#3'Top'#2#6#5'Width'#2'Z'#7'Anchors'
|
||||
+#11#5'akTop'#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'
|
||||
+#2#6#7'Caption'#6#6'Cancel'#20'Constraints.MinWidth'#2'Z'#4'Kind'#7#8'bkCanc'
|
||||
+'el'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#7'TBitBtn'#5'B'
|
||||
+'tnOK'#21'AnchorSideTop.Control'#7#14'FPanelOKCancel'#23'AnchorSideRight.Con'
|
||||
+'trol'#7#9'BtnCancel'#24'AnchorSideBottom.Control'#7#14'FPanelOKCancel'#21'A'
|
||||
+'nchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#224#0#6'Height'#2#26#3'Top'#2
|
||||
+#6#5'Width'#2'Z'#7'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0#8'AutoSize'
|
||||
+#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#20'Constraints.MinWidth'
|
||||
+#2'Z'#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8
|
||||
+'TabOrder'#2#3#0#0#0#9'TCheckBox'#17'DuplicateCheckBox'#23'AnchorSideRight.C'
|
||||
+'ontrol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3'p'#1#6
|
||||
+'Height'#2#19#3'Top'#2'0'#5'Width'#3#234#0#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#0#19'BorderSpacing.Right'#2#6#7'Caption'#6#17'DuplicateCheckBox'#7
|
||||
+'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#2#0#0#5'TEdit'#11'ColumnsE'
|
||||
+'dit'#4'Left'#3'p'#1#6'Height'#2#23#3'Top'#2'a'#5'Width'#2'"'#5'Color'#7#9'c'
|
||||
+'lBtnFace'#8'OnChange'#7#17'ColumnsEditChange'#9'OnKeyDown'#13#8'ReadOnly'#9
|
||||
+#8'TabOrder'#2#3#4'Text'#6#1'1'#0#0#7'TUpDown'#13'ColumnsUpDown'#4'Left'#3
|
||||
+#146#1#6'Height'#2#23#3'Top'#2'a'#5'Width'#2#17#9'Associate'#7#11'ColumnsEdi'
|
||||
+'t'#3'Min'#2#1#8'Position'#2#1#8'TabOrder'#2#4#0#0#8'TToolBar'#7'ToolBar'#6
|
||||
+'Height'#2#26#5'Width'#3'`'#2#7'Caption'#6#7'ToolBar'#4'Flat'#9#8'TabOrder'#2
|
||||
+#5#0#11'TToolButton'#5'tbAdd'#4'Left'#2#1#3'Top'#2#2#7'Caption'#6#5'tbAdd'#14
|
||||
+'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#7'AddItem'#0#0#11'TToolButton'
|
||||
+#8'tbDelete'#4'Left'#2#24#3'Top'#2#2#7'Caption'#6#8'tbDelete'#14'ParentShowH'
|
||||
+'int'#8#8'ShowHint'#9#7'OnClick'#7#10'DeleteItem'#0#0#11'TToolButton'#11'Too'
|
||||
+'lButton3'#4'Left'#2'/'#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton3'
|
||||
+#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#4'tbUp'#4'Left'#2'2'#3'Top'#2
|
||||
+#2#7'Caption'#6#4'tbUp'#14'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#10'M'
|
||||
+'oveUpItem'#0#0#11'TToolButton'#6'tbDown'#4'Left'#2'I'#3'Top'#2#2#7'Caption'
|
||||
+#6#6'tbDown'#14'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#12'MoveDownItem'
|
||||
+#0#0#11'TToolButton'#11'ToolButton6'#4'Left'#2'`'#3'Top'#2#2#5'Width'#2#3#7
|
||||
,'Caption'#6#11'ToolButton6'#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#6
|
||||
+'tbEdit'#4'Left'#2'c'#3'Top'#2#2#7'Caption'#6#6'tbEdit'#14'ParentShowHint'#8
|
||||
+#8'ShowHint'#9#7'OnClick'#7#10'ModifyItem'#0#0#6'TLabel'#12'LabelDisable'#19
|
||||
+'AnchorSideLeft.Side'#7#9'asrBottom'#18'AnchorSideTop.Side'#7#9'asrBottom'#4
|
||||
+'Left'#2'z'#6'Height'#2#22#3'Top'#2#2#5'Width'#2'<'#7'Caption'#6#12'LabelDis'
|
||||
+'able'#10'Font.Color'#7#10'clHotLight'#11'ParentColor'#8#0#0#0#10'TPopupMenu'
|
||||
+#10'FPopupMenu'#7'OnPopup'#7#11'CreateItems'#4'left'#3#224#1#3'top'#3#145#0#0
|
||||
+#0#0#20'TCheckGroupEditorDlg'#19'CheckGroupEditorDlg'#4'Left'#3#138#1#6'Heig'
|
||||
+'ht'#3','#1#3'Top'#3#195#0#5'Width'#3'`'#2#18'HorzScrollBar.Page'#3'_'#2#18
|
||||
+'VertScrollBar.Page'#3'+'#1#11'BorderIcons'#11#12'biSystemMenu'#0#11'BorderS'
|
||||
+'tyle'#7#8'bsDialog'#7'Caption'#6#19'CheckGroupEditorDlg'#12'ClientHeight'#3
|
||||
+','#1#11'ClientWidth'#3'`'#2#8'OnCreate'#7#10'FormCreate'#10'LCLVersion'#6#6
|
||||
+'0.9.25'#0#6'TLabel'#12'ColumnsLabel'#4'Left'#3'q'#1#6'Height'#2#14#3'Top'#2
|
||||
+'P'#5'Width'#2'B'#7'Caption'#6#12'ColumnsLabel'#11'ParentColor'#8#0#0#11'TCh'
|
||||
+'eckGroup'#6'FCheck'#6'Height'#3#236#0#3'Top'#2#26#5'Width'#3'h'#1#5'Align'#7
|
||||
+#6'alLeft'#8'AutoFill'#9#7'Caption'#6#6'FCheck'#28'ChildSizing.LeftRightSpac'
|
||||
+'ing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizon'
|
||||
+'tal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'cr'
|
||||
+'sHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChild'
|
||||
+'s'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layou'
|
||||
+'t'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1
|
||||
+#11'OnItemClick'#7#9'ItemClick'#9'PopupMenu'#7#10'FPopupMenu'#8'TabOrder'#2#0
|
||||
+#0#0#6'TPanel'#14'FPanelOKCancel'#6'Height'#2'&'#3'Top'#3#6#1#5'Width'#3'`'#2
|
||||
+#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'BevelInner'#7#9'bvLowered'#12'Clien'
|
||||
+'tHeight'#2'&'#11'ClientWidth'#3'`'#2#8'TabOrder'#2#1#0#7'TBitBtn'#7'BtnHelp'
|
||||
+#21'AnchorSideTop.Control'#7#14'FPanelOKCancel'#23'AnchorSideRight.Control'#7
|
||||
+#14'FPanelOKCancel'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBot'
|
||||
+'tom.Control'#7#14'FPanelOKCancel'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
|
||||
+'Left'#3#0#2#6'Height'#2#26#3'Top'#2#6#5'Width'#2'Z'#7'Anchors'#11#5'akTop'#7
|
||||
+'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'
|
||||
+#6#5'&Help'#20'Constraints.MinWidth'#2'Z'#4'Kind'#7#6'bkHelp'#9'NumGlyphs'#2
|
||||
+#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#8'BtnApply'#21'AnchorSideTop.Control'#7#14
|
||||
+'FPanelOKCancel'#23'AnchorSideRight.Control'#7#7'BtnHelp'#24'AnchorSideBotto'
|
||||
+'m.Control'#7#14'FPanelOKCancel'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
|
||||
+'Left'#3#160#1#6'Height'#2#26#3'Top'#2#6#5'Width'#2'Z'#7'Anchors'#11#5'akTop'
|
||||
+#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Capti'
|
||||
+'on'#6#6'&Apply'#20'Constraints.MinWidth'#2'Z'#9'NumGlyphs'#2#0#7'OnClick'#7
|
||||
+#10'ApplyCheck'#8'TabOrder'#2#1#0#0#7'TBitBtn'#9'BtnCancel'#21'AnchorSideTop'
|
||||
+'.Control'#7#14'FPanelOKCancel'#23'AnchorSideRight.Control'#7#8'BtnApply'#24
|
||||
+'AnchorSideBottom.Control'#7#14'FPanelOKCancel'#21'AnchorSideBottom.Side'#7#9
|
||||
+'asrBottom'#4'Left'#3'@'#1#6'Height'#2#26#3'Top'#2#6#5'Width'#2'Z'#7'Anchors'
|
||||
+#11#5'akTop'#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'
|
||||
+#2#6#7'Caption'#6#6'Cancel'#20'Constraints.MinWidth'#2'Z'#4'Kind'#7#8'bkCanc'
|
||||
+'el'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#7'TBitBtn'#5'B'
|
||||
+'tnOK'#21'AnchorSideTop.Control'#7#14'FPanelOKCancel'#23'AnchorSideRight.Con'
|
||||
+'trol'#7#9'BtnCancel'#24'AnchorSideBottom.Control'#7#14'FPanelOKCancel'#21'A'
|
||||
+'nchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#224#0#6'Height'#2#26#3'Top'#2
|
||||
+#6#5'Width'#2'Z'#7'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0#8'AutoSize'
|
||||
+#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#20'Constraints.MinWidth'
|
||||
+#2'Z'#7'Default'#9#4'Kind'#7#4'bkOK'#11'ModalResult'#2#1#9'NumGlyphs'#2#0#8
|
||||
+'TabOrder'#2#3#0#0#0#9'TCheckBox'#17'DuplicateCheckBox'#23'AnchorSideRight.C'
|
||||
+'ontrol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3'p'#1#6
|
||||
+'Height'#2#19#3'Top'#2'0'#5'Width'#3#234#0#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#0#19'BorderSpacing.Right'#2#6#7'Caption'#6#17'DuplicateCheckBox'#7
|
||||
+'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#2#0#0#5'TEdit'#11'ColumnsE'
|
||||
+'dit'#4'Left'#3'p'#1#6'Height'#2#23#3'Top'#2'a'#5'Width'#2'"'#5'Color'#7#9'c'
|
||||
+'lBtnFace'#8'OnChange'#7#17'ColumnsEditChange'#9'OnKeyDown'#13#8'ReadOnly'#9
|
||||
+#8'TabOrder'#2#3#4'Text'#6#1'1'#0#0#7'TUpDown'#13'ColumnsUpDown'#4'Left'#3
|
||||
+#146#1#6'Height'#2#23#3'Top'#2'a'#5'Width'#2#17#9'Associate'#7#11'ColumnsEdi'
|
||||
+'t'#3'Min'#2#1#8'Position'#2#1#8'TabOrder'#2#4#0#0#8'TToolBar'#7'ToolBar'#6
|
||||
+'Height'#2#26#5'Width'#3'`'#2#7'Caption'#6#7'ToolBar'#4'Flat'#9#8'TabOrder'#2
|
||||
+#5#0#11'TToolButton'#5'tbAdd'#4'Left'#2#1#3'Top'#2#2#7'Caption'#6#5'tbAdd'#14
|
||||
+'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#7'AddItem'#0#0#11'TToolButton'
|
||||
+#8'tbDelete'#4'Left'#2#24#3'Top'#2#2#7'Caption'#6#8'tbDelete'#14'ParentShowH'
|
||||
,'int'#8#8'ShowHint'#9#7'OnClick'#7#10'DeleteItem'#0#0#11'TToolButton'#11'Too'
|
||||
+'lButton3'#4'Left'#2'/'#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton3'
|
||||
+#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#4'tbUp'#4'Left'#2'2'#3'Top'#2
|
||||
+#2#7'Caption'#6#4'tbUp'#14'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#10'M'
|
||||
+'oveUpItem'#0#0#11'TToolButton'#6'tbDown'#4'Left'#2'I'#3'Top'#2#2#7'Caption'
|
||||
+#6#6'tbDown'#14'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#12'MoveDownItem'
|
||||
+#0#0#11'TToolButton'#11'ToolButton6'#4'Left'#2'`'#3'Top'#2#2#5'Width'#2#3#7
|
||||
+'Caption'#6#11'ToolButton6'#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#6
|
||||
+'tbEdit'#4'Left'#2'c'#3'Top'#2#2#7'Caption'#6#6'tbEdit'#14'ParentShowHint'#8
|
||||
+#8'ShowHint'#9#7'OnClick'#7#10'ModifyItem'#0#0#6'TLabel'#12'LabelDisable'#19
|
||||
+'AnchorSideLeft.Side'#7#9'asrBottom'#18'AnchorSideTop.Side'#7#9'asrBottom'#4
|
||||
+'Left'#2'z'#6'Height'#2#22#3'Top'#2#2#5'Width'#2'<'#7'Caption'#6#12'LabelDis'
|
||||
+'able'#10'Font.Color'#7#10'clHotLight'#11'ParentColor'#8#0#0#0#10'TPopupMenu'
|
||||
+#10'FPopupMenu'#7'OnPopup'#7#11'CreateItems'#4'left'#3#224#1#3'top'#3#145#0#0
|
||||
+#0#0
|
||||
+'ght'#3','#1#3'Top'#3#195#0#5'Width'#3'`'#2#11'BorderIcons'#11#12'biSystemMe'
|
||||
+'nu'#0#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6#19'CheckGroupEditorDlg'#12
|
||||
+'ClientHeight'#3','#1#11'ClientWidth'#3'`'#2#8'OnCreate'#7#10'FormCreate'#10
|
||||
+'LCLVersion'#6#6'0.9.27'#0#6'TLabel'#12'ColumnsLabel'#22'AnchorSideLeft.Cont'
|
||||
+'rol'#7#6'FCheck'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Co'
|
||||
+'ntrol'#7#17'DuplicateCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'
|
||||
+#3't'#1#6'Height'#2#14#3'Top'#2'G'#5'Width'#2'B'#18'BorderSpacing.Left'#2#6
|
||||
+#17'BorderSpacing.Top'#2#6#7'Caption'#6#12'ColumnsLabel'#11'ParentColor'#8#0
|
||||
+#0#11'TCheckGroup'#6'FCheck'#22'AnchorSideLeft.Control'#7#5'Owner'#21'Anchor'
|
||||
+'SideTop.Control'#7#7'ToolBar'#24'AnchorSideBottom.Control'#7#8'BtnPanel'#4
|
||||
+'Left'#2#6#6'Height'#3#230#0#3'Top'#2' '#5'Width'#3'h'#1#5'Align'#7#6'alLeft'
|
||||
+#8'AutoFill'#9#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#20'Borde'
|
||||
+'rSpacing.Bottom'#2#6#7'Caption'#6#6'FCheck'#28'ChildSizing.LeftRightSpacing'
|
||||
+#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7
|
||||
+#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomoge'
|
||||
+'nousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'C'
|
||||
+'hildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29
|
||||
+'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#11'OnIte'
|
||||
+'mClick'#7#9'ItemClick'#9'PopupMenu'#7#10'FPopupMenu'#8'TabOrder'#2#0#0#0#9
|
||||
+'TCheckBox'#17'DuplicateCheckBox'#22'AnchorSideLeft.Control'#7#6'FCheck'#19
|
||||
+'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#6'FCheck'#23
|
||||
+'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'
|
||||
+#4'Left'#3't'#1#6'Height'#2#17#3'Top'#2'0'#5'Width'#3#230#0#7'Anchors'#11#5
|
||||
+'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.T'
|
||||
+'op'#2#16#19'BorderSpacing.Right'#2#6#7'Caption'#6#17'DuplicateCheckBox'#7'C'
|
||||
+'hecked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#5'TEdit'#11'ColumnsEd'
|
||||
+'it'#22'AnchorSideLeft.Control'#7#12'ColumnsLabel'#21'AnchorSideTop.Control'
|
||||
+#7#12'ColumnsLabel'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3'w'#1#6'H'
|
||||
+'eight'#2#23#3'Top'#2'X'#5'Width'#2'"'#18'BorderSpacing.Left'#2#3#17'BorderS'
|
||||
+'pacing.Top'#2#3#5'Color'#7#9'clBtnFace'#8'OnChange'#7#17'ColumnsEditChange'
|
||||
+#8'ReadOnly'#9#8'TabOrder'#2#2#4'Text'#6#1'1'#0#0#7'TUpDown'#13'ColumnsUpDow'
|
||||
+'n'#22'AnchorSideLeft.Control'#7#11'ColumnsEdit'#19'AnchorSideLeft.Side'#7#9
|
||||
+'asrBottom'#21'AnchorSideTop.Control'#7#11'ColumnsEdit'#24'AnchorSideBottom.'
|
||||
+'Control'#7#11'ColumnsEdit'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'
|
||||
+#3#153#1#6'Height'#2#23#3'Top'#2'X'#5'Width'#2#17#7'Anchors'#11#5'akTop'#6'a'
|
||||
+'kLeft'#8'akBottom'#0#9'Associate'#7#11'ColumnsEdit'#3'Min'#2#1#8'Position'#2
|
||||
+#1#8'TabOrder'#2#3#4'Wrap'#8#0#0#8'TToolBar'#7'ToolBar'#4'Left'#2#0#6'Height'
|
||||
+#2#26#3'Top'#2#0#5'Width'#3'`'#2#7'Caption'#6#7'ToolBar'#8'TabOrder'#2#4#0#11
|
||||
+'TToolButton'#5'tbAdd'#4'Left'#2#1#3'Top'#2#2#7'Caption'#6#5'tbAdd'#14'Paren'
|
||||
+'tShowHint'#8#8'ShowHint'#9#7'OnClick'#7#7'AddItem'#0#0#11'TToolButton'#8'tb'
|
||||
+'Delete'#4'Left'#2#24#3'Top'#2#2#7'Caption'#6#8'tbDelete'#14'ParentShowHint'
|
||||
+#8#8'ShowHint'#9#7'OnClick'#7#10'DeleteItem'#0#0#11'TToolButton'#11'ToolButt'
|
||||
+'on3'#4'Left'#2'/'#3'Top'#2#2#5'Width'#2#3#7'Caption'#6#11'ToolButton3'#5'St'
|
||||
+'yle'#7#10'tbsDivider'#0#0#11'TToolButton'#4'tbUp'#4'Left'#2'2'#3'Top'#2#2#7
|
||||
+'Caption'#6#4'tbUp'#14'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#10'MoveU'
|
||||
+'pItem'#0#0#11'TToolButton'#6'tbDown'#4'Left'#2'I'#3'Top'#2#2#7'Caption'#6#6
|
||||
+'tbDown'#14'ParentShowHint'#8#8'ShowHint'#9#7'OnClick'#7#12'MoveDownItem'#0#0
|
||||
+#11'TToolButton'#11'ToolButton6'#4'Left'#2'`'#3'Top'#2#2#5'Width'#2#3#7'Capt'
|
||||
+'ion'#6#11'ToolButton6'#5'Style'#7#10'tbsDivider'#0#0#11'TToolButton'#6'tbEd'
|
||||
+'it'#4'Left'#2'c'#3'Top'#2#2#7'Caption'#6#6'tbEdit'#14'ParentShowHint'#8#8'S'
|
||||
+'howHint'#9#7'OnClick'#7#10'ModifyItem'#0#0#6'TLabel'#12'LabelDisable'#19'An'
|
||||
+'chorSideLeft.Side'#7#9'asrBottom'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'L'
|
||||
+'eft'#2'z'#6'Height'#2#22#3'Top'#2#2#5'Width'#2'<'#7'Caption'#6#12'LabelDisa'
|
||||
+'ble'#10'Font.Color'#7#10'clHotLight'#11'ParentColor'#8#10'ParentFont'#8#0#0
|
||||
+#0#12'TButtonPanel'#8'BtnPanel'#4'Left'#2#6#6'Height'#2#26#3'Top'#3#12#1#5'W'
|
||||
+'idth'#3'T'#2#8'TabOrder'#2#5#9'ShowBevel'#8#0#0#10'TPopupMenu'#10'FPopupMen'
|
||||
+'u'#7'OnPopup'#7#11'CreateItems'#4'left'#3#224#1#3'top'#3#145#0#0#0#0
|
||||
]);
|
||||
|
||||
|
||||
|
||||
@ -19,23 +19,19 @@ interface
|
||||
uses
|
||||
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, ExtCtrls,
|
||||
StdCtrls, Buttons, Menus, ComCtrls,
|
||||
ObjInspStrConsts, IDEImagesIntf;
|
||||
ObjInspStrConsts, IDEImagesIntf, ButtonPanel;
|
||||
|
||||
type
|
||||
|
||||
{ TCheckGroupEditorDlg }
|
||||
|
||||
TCheckGroupEditorDlg = class(TForm)
|
||||
BtnApply: TBitBtn;
|
||||
BtnCancel: TBitBtn;
|
||||
BtnHelp: TBitBtn;
|
||||
BtnOK: TBitBtn;
|
||||
DuplicateCheckBox: TCheckBox;
|
||||
ColumnsEdit: TEdit;
|
||||
FCheck: TCheckGroup;
|
||||
aCheck: TCheckGroup;
|
||||
FPanelOKCancel: TPanel;
|
||||
ColumnsLabel: TLabel;
|
||||
BtnPanel: TButtonPanel;
|
||||
FPopupMenu: TPopupMenu;
|
||||
ColumnsUpDown: TUpDown;
|
||||
LabelDisable: TLabel;
|
||||
@ -148,6 +144,10 @@ begin
|
||||
ColumnsLabel.Caption := cgColumns;
|
||||
DuplicateCheckBox.Caption := cgCheckDuplicate;
|
||||
LabelDisable.Caption := cgDisable;
|
||||
BtnPanel.CloseButton.Caption := sccsTrEdtApply;
|
||||
BtnPanel.CloseButton.Glyph := nil;
|
||||
BtnPanel.CloseButton.ModalResult := mrNone;
|
||||
BtnPanel.CloseButton.OnClick := @ApplyCheck;
|
||||
|
||||
tbAdd.Hint := clbAdd;
|
||||
tbDelete.Hint := clbDeleteHint;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user