lazarus/lcl/forms/finddlgunit.lfm
mattias d353d99858 lcl: TFindDialog: autosize buttons
git-svn-id: trunk@46650 -
2014-10-23 12:49:05 +00:00

158 lines
3.6 KiB
Plaintext

object FindDialogForm: TFindDialogForm
Left = 499
Height = 123
Top = 403
Width = 480
BorderIcons = [biSystemMenu, biHelp]
Caption = 'Find'
ClientHeight = 123
ClientWidth = 480
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '1.3'
object FindLabel: TLabel
AnchorSideTop.Control = EditFind
AnchorSideTop.Side = asrCenter
Left = 6
Height = 16
Top = 13
Width = 74
BorderSpacing.Right = 2
Caption = 'Text to find'
FocusControl = EditFind
ParentColor = False
end
object EditFind: TEdit
AnchorSideLeft.Control = FindLabel
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = BtnPanel
Left = 82
Height = 22
Top = 10
Width = 294
Anchors = [akTop, akLeft, akRight]
OnChange = EditFindChange
TabOrder = 0
Text = 'EditFind'
end
object DirectionRadioGroup: TRadioGroup
AnchorSideLeft.Control = FlagsPanel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = EditFind
AnchorSideTop.Side = asrBottom
Left = 143
Height = 45
Top = 38
Width = 197
AutoFill = True
BorderSpacing.Around = 6
Caption = 'Direction'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 2
ClientHeight = 23
ClientWidth = 189
Columns = 2
Items.Strings = (
'Forward'
'Backward'
)
TabOrder = 1
end
object FlagsPanel: TPanel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = EditFind
AnchorSideTop.Side = asrBottom
Left = 6
Height = 66
Top = 38
Width = 131
AutoSize = True
BorderSpacing.Around = 6
BevelOuter = bvNone
ChildSizing.VerticalSpacing = 6
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 66
ClientWidth = 131
TabOrder = 2
object WholeWordsOnlyCheckBox: TCheckBox
Left = 0
Height = 18
Top = 0
Width = 131
Caption = 'Whole words only'
TabOrder = 0
end
object CaseSensitiveCheckBox: TCheckBox
Left = 0
Height = 18
Top = 24
Width = 131
Caption = 'Case sensitive'
TabOrder = 1
end
object EntireScopeCheckBox: TCheckBox
Left = 0
Height = 18
Top = 48
Width = 131
Caption = 'Search entire file'
TabOrder = 2
end
end
object BtnPanel: TPanel
Left = 376
Height = 123
Top = 0
Width = 104
Align = alRight
AutoSize = True
BevelOuter = bvNone
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.VerticalSpacing = 6
ClientHeight = 123
ClientWidth = 104
TabOrder = 3
object FindButton: TButton
Left = 6
Height = 20
Top = 6
Width = 92
Align = alTop
AutoSize = True
Caption = 'Find more'
Default = True
TabOrder = 0
end
object CancelButton: TButton
Left = 6
Height = 20
Top = 32
Width = 92
Align = alTop
AutoSize = True
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
end
object HelpButton: TButton
Left = 6
Height = 20
Top = 97
Width = 92
Align = alBottom
AutoSize = True
Caption = 'Help'
TabOrder = 2
end
end
end