Merge pull request Alexey-T#102 from springsunx/master

add statusbar read/write tip
piaodbg · Jan 28, 2023 · cc91371 · cc91371
2 parents 2b368a9 + cd05616
commit cc91371
Show file tree

Hide file tree

Showing 2 changed files with 156 additions and 102 deletions.
diff --git a/form_find.lfm b/form_find.lfm
@@ -1,156 +1,156 @@
 object fmFind: TfmFind
   Left = 446
-  Height = 350
+  Height = 233
   Top = 397
-  Width = 734
+  Width = 489
   BorderStyle = bsDialog
   Caption = 'Find/Replace'
-  ClientHeight = 350
-  ClientWidth = 734
+  ClientHeight = 233
+  ClientWidth = 489
   OnShow = FormShow
   Position = poScreenCenter
-  LCLVersion = '2.2.4.0'
+  LCLVersion = '2.3.0.0'
   object bFind: TButton
-    Left = 564
-    Height = 38
-    Top = 72
-    Width = 148
+    Left = 376
+    Height = 25
+    Top = 48
+    Width = 99
     Caption = 'Find'
     ModalResult = 1
     TabOrder = 10
   end
   object bCancel: TButton
-    Left = 564
-    Height = 38
-    Top = 216
-    Width = 148
+    Left = 376
+    Height = 25
+    Top = 144
+    Width = 99
     Cancel = True
     Caption = 'Cancel'
     ModalResult = 2
     TabOrder = 15
   end
   object Label1: TLabel
-    Left = 14
-    Height = 24
-    Top = 12
-    Width = 76
+    Left = 9
+    Height = 17
+    Top = 8
+    Width = 66
     Caption = 'Find what:'
     ParentColor = False
   end
   object edFind: TEdit
-    Left = 14
-    Height = 32
-    Top = 48
-    Width = 538
+    Left = 9
+    Height = 27
+    Top = 32
+    Width = 359
     TabOrder = 0
   end
   object chkRegex: TCheckBox
-    Left = 14
-    Height = 28
-    Top = 192
-    Width = 118
+    Left = 9
+    Height = 24
+    Top = 128
+    Width = 64
     Caption = 'Regex'
     OnChange = chkRegexChange
     TabOrder = 3
   end
   object chkBack: TCheckBox
-    Left = 14
-    Height = 28
-    Top = 300
-    Width = 100
+    Left = 9
+    Height = 24
+    Top = 200
+    Width = 92
     Caption = 'Backward'
     TabOrder = 6
   end
   object chkCase: TCheckBox
-    Left = 14
-    Height = 28
-    Top = 228
+    Left = 9
+    Height = 24
+    Top = 152
     Width = 118
     Caption = 'Case sensitive'
     TabOrder = 4
   end
   object chkWords: TCheckBox
-    Left = 14
-    Height = 28
-    Top = 264
-    Width = 118
+    Left = 9
+    Height = 24
+    Top = 176
+    Width = 142
     Caption = 'Whole words only'
     TabOrder = 5
   end
   object edRep: TEdit
-    Left = 14
-    Height = 32
-    Top = 132
-    Width = 538
+    Left = 9
+    Height = 27
+    Top = 88
+    Width = 359
     TabOrder = 2
   end
   object chkRep: TCheckBox
-    Left = 14
-    Height = 28
-    Top = 96
-    Width = 104
+    Left = 9
+    Height = 24
+    Top = 64
+    Width = 112
     Caption = 'Replace with:'
     OnChange = chkRepChange
     TabOrder = 1
   end
   object bRep: TButton
-    Left = 564
-    Height = 38
-    Top = 24
-    Width = 148
+    Left = 376
+    Height = 25
+    Top = 16
+    Width = 99
     Caption = 'Replace'
     Default = True
     ModalResult = 6
     TabOrder = 11
   end
   object bRepAll: TButton
-    Left = 564
-    Height = 38
-    Top = 72
-    Width = 148
+    Left = 376
+    Height = 25
+    Top = 48
+    Width = 99
     Caption = 'Replace all'
     ModalResult = 10
     TabOrder = 12
   end
   object chkFromCaret: TCheckBox
-    Left = 324
-    Height = 28
-    Top = 192
-    Width = 118
+    Left = 216
+    Height = 24
+    Top = 128
+    Width = 98
     Caption = 'From caret'
     TabOrder = 7
   end
   object bCount: TButton
-    Left = 564
-    Height = 38
-    Top = 120
-    Width = 148
+    Left = 376
+    Height = 25
+    Top = 80
+    Width = 99
     Caption = 'Count all'
     ModalResult = 5
     TabOrder = 13
   end
   object chkConfirm: TCheckBox
-    Left = 324
-    Height = 28
-    Top = 228
-    Width = 100
+    Left = 216
+    Height = 24
+    Top = 152
+    Width = 131
     Caption = 'Confirm replace'
     TabOrder = 8
   end
   object bMarkAll: TButton
-    Left = 564
-    Height = 38
-    Top = 168
-    Width = 148
+    Left = 376
+    Height = 25
+    Top = 112
+    Width = 99
     Caption = 'Mark all'
     ModalResult = 4
     TabOrder = 14
   end
   object chkInSel: TCheckBox
-    Left = 324
-    Height = 28
-    Top = 264
-    Width = 118
+    Left = 216
+    Height = 24
+    Top = 176
+    Width = 102
     Caption = 'In selection'
     TabOrder = 9
   end