1object FindDialogForm: TFindDialogForm 2 Left = 499 3 Height = 123 4 Top = 403 5 Width = 480 6 BorderIcons = [biSystemMenu, biHelp] 7 Caption = 'Find' 8 ClientHeight = 123 9 ClientWidth = 480 10 OnCreate = FormCreate 11 Position = poScreenCenter 12 LCLVersion = '1.3' 13 object FindLabel: TLabel 14 AnchorSideTop.Control = EditFind 15 AnchorSideTop.Side = asrCenter 16 Left = 6 17 Height = 16 18 Top = 13 19 Width = 74 20 BorderSpacing.Right = 2 21 Caption = 'Text to find' 22 FocusControl = EditFind 23 ParentColor = False 24 end 25 object EditFind: TEdit 26 AnchorSideLeft.Control = FindLabel 27 AnchorSideLeft.Side = asrBottom 28 AnchorSideRight.Control = BtnPanel 29 Left = 82 30 Height = 22 31 Top = 10 32 Width = 294 33 Anchors = [akTop, akLeft, akRight] 34 OnChange = EditFindChange 35 TabOrder = 0 36 Text = 'EditFind' 37 end 38 object DirectionRadioGroup: TRadioGroup 39 AnchorSideLeft.Control = FlagsPanel 40 AnchorSideLeft.Side = asrBottom 41 AnchorSideTop.Control = EditFind 42 AnchorSideTop.Side = asrBottom 43 Left = 143 44 Height = 45 45 Top = 38 46 Width = 197 47 AutoFill = True 48 BorderSpacing.Around = 6 49 Caption = 'Direction' 50 ChildSizing.LeftRightSpacing = 6 51 ChildSizing.TopBottomSpacing = 6 52 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 53 ChildSizing.EnlargeVertical = crsHomogenousChildResize 54 ChildSizing.ShrinkHorizontal = crsScaleChilds 55 ChildSizing.ShrinkVertical = crsScaleChilds 56 ChildSizing.Layout = cclLeftToRightThenTopToBottom 57 ChildSizing.ControlsPerLine = 2 58 ClientHeight = 23 59 ClientWidth = 189 60 Columns = 2 61 Items.Strings = ( 62 'Forward' 63 'Backward' 64 ) 65 TabOrder = 1 66 end 67 object FlagsPanel: TPanel 68 AnchorSideLeft.Control = Owner 69 AnchorSideTop.Control = EditFind 70 AnchorSideTop.Side = asrBottom 71 Left = 6 72 Height = 66 73 Top = 38 74 Width = 131 75 AutoSize = True 76 BorderSpacing.Around = 6 77 BevelOuter = bvNone 78 ChildSizing.VerticalSpacing = 6 79 ChildSizing.Layout = cclLeftToRightThenTopToBottom 80 ChildSizing.ControlsPerLine = 1 81 ClientHeight = 66 82 ClientWidth = 131 83 TabOrder = 2 84 object WholeWordsOnlyCheckBox: TCheckBox 85 Left = 0 86 Height = 18 87 Top = 0 88 Width = 131 89 Caption = 'Whole words only' 90 TabOrder = 0 91 end 92 object CaseSensitiveCheckBox: TCheckBox 93 Left = 0 94 Height = 18 95 Top = 24 96 Width = 131 97 Caption = 'Case sensitive' 98 TabOrder = 1 99 end 100 object EntireScopeCheckBox: TCheckBox 101 Left = 0 102 Height = 18 103 Top = 48 104 Width = 131 105 Caption = 'Search entire file' 106 TabOrder = 2 107 end 108 end 109 object BtnPanel: TPanel 110 Left = 376 111 Height = 123 112 Top = 0 113 Width = 104 114 Align = alRight 115 AutoSize = True 116 BevelOuter = bvNone 117 ChildSizing.LeftRightSpacing = 6 118 ChildSizing.TopBottomSpacing = 6 119 ChildSizing.VerticalSpacing = 6 120 ClientHeight = 123 121 ClientWidth = 104 122 TabOrder = 3 123 object FindButton: TButton 124 Left = 6 125 Height = 20 126 Top = 6 127 Width = 92 128 Align = alTop 129 AutoSize = True 130 Caption = 'Find more' 131 Default = True 132 TabOrder = 0 133 end 134 object CancelButton: TButton 135 Left = 6 136 Height = 20 137 Top = 32 138 Width = 92 139 Align = alTop 140 AutoSize = True 141 Cancel = True 142 Caption = 'Cancel' 143 ModalResult = 2 144 TabOrder = 1 145 end 146 object HelpButton: TButton 147 Left = 6 148 Height = 20 149 Top = 97 150 Width = 92 151 Align = alBottom 152 AutoSize = True 153 Caption = 'Help' 154 TabOrder = 2 155 end 156 end 157end 158