From f67c5cc9bbebf03d2279c07047d34201adbddc42 Mon Sep 17 00:00:00 2001
From: Maxim Ganetsky <maxim@lazarus-ide.org>
Date: Tue, 1 Oct 2024 18:20:34 +0300
Subject: [PATCH] IDEIntf: improved strings property editor dialog i18n

---
 components/ideintf/stringspropeditdlg.lfm | 39 +++++++++++------------
 components/ideintf/stringspropeditdlg.pas |  1 +
 2 files changed, 20 insertions(+), 20 deletions(-)

diff --git a/components/ideintf/stringspropeditdlg.lfm b/components/ideintf/stringspropeditdlg.lfm
index 143e056188..ac647604f3 100644
--- a/components/ideintf/stringspropeditdlg.lfm
+++ b/components/ideintf/stringspropeditdlg.lfm
@@ -9,10 +9,9 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
   ClientWidth = 400
   Constraints.MinHeight = 160
   Constraints.MinWidth = 180
+  Position = poScreenCenter
   OnClose = FormClose
   OnCreate = FormCreate
-  Position = poScreenCenter
-  LCLVersion = '2.3.0.0'
   object TextGroupBox: TGroupBox
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Owner
@@ -20,22 +19,22 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
     AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = BtnPanel
     Left = 6
-    Height = 252
+    Height = 246
     Top = 6
     Width = 388
     Align = alTop
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Around = 6
-    ClientHeight = 250
+    ClientHeight = 244
     ClientWidth = 386
     TabOrder = 0
     object StatusLabel: TLabel
       AnchorSideBottom.Control = TextGroupBox
       AnchorSideBottom.Side = asrBottom
       Left = 9
-      Height = 15
-      Top = 229
-      Width = 63
+      Height = 16
+      Top = 222
+      Width = 69
       Anchors = [akLeft, akBottom]
       BorderSpacing.Around = 6
       Caption = 'StatusLabel'
@@ -45,15 +44,15 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
       AnchorSideRight.Control = SortButton
       AnchorSideBottom.Control = StatusLabel
       Left = 6
-      Height = 217
+      Height = 210
       Top = 6
       Width = 293
       Anchors = [akTop, akLeft, akRight, akBottom]
       BorderSpacing.Around = 6
-      OnChange = MemoChange
       ScrollBars = ssAutoBoth
       TabOrder = 0
       WordWrap = False
+      OnChange = MemoChange
     end
     object SortButton: TButton
       AnchorSideLeft.Control = Memo
@@ -61,7 +60,7 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
       AnchorSideRight.Control = TextGroupBox
       AnchorSideRight.Side = asrBottom
       Left = 305
-      Height = 31
+      Height = 32
       Top = 6
       Width = 75
       Anchors = [akTop, akRight]
@@ -69,8 +68,8 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
       BorderSpacing.Around = 6
       Caption = 'Sort'
       Constraints.MinWidth = 75
-      OnClick = SortButtonClick
       TabOrder = 1
+      OnClick = SortButtonClick
     end
     object ClearButton: TButton
       AnchorSideLeft.Control = SortButton
@@ -78,15 +77,15 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
       AnchorSideTop.Side = asrBottom
       AnchorSideRight.Control = SortButton
       AnchorSideRight.Side = asrBottom
-      AutoSize = True
       Left = 305
-      Height = 27
-      Top = 43
+      Height = 32
+      Top = 44
       Width = 75
       Anchors = [akTop, akLeft, akRight]
+      AutoSize = True
       Caption = 'Clear'
-      OnClick = ClearButtonClick
       TabOrder = 2
+      OnClick = ClearButtonClick
     end
     object SaveButton: TButton
       AnchorSideLeft.Control = SortButton
@@ -95,21 +94,21 @@ object StringsPropEditorFrm: TStringsPropEditorFrm
       AnchorSideRight.Control = SortButton
       AnchorSideRight.Side = asrBottom
       Left = 305
-      Height = 31
-      Top = 76
+      Height = 32
+      Top = 82
       Width = 75
       Anchors = [akTop, akLeft, akRight]
       AutoSize = True
       BorderSpacing.Top = 6
       Caption = 'Save'
-      OnClick = SaveButtonClick
       TabOrder = 3
+      OnClick = SaveButtonClick
     end
   end
   object BtnPanel: TButtonPanel
     Left = 6
-    Height = 32
-    Top = 264
+    Height = 38
+    Top = 258
     Width = 388
     OKButton.Name = 'OKButton'
     OKButton.DefaultCaption = True
diff --git a/components/ideintf/stringspropeditdlg.pas b/components/ideintf/stringspropeditdlg.pas
index e9d080669e..d22233fa28 100644
--- a/components/ideintf/stringspropeditdlg.pas
+++ b/components/ideintf/stringspropeditdlg.pas
@@ -60,6 +60,7 @@ begin
   StatusLabel.Caption := ois0Lines0Chars;
   SortButton.Caption := oisSort;
   ClearButton.Caption := oisClear;
+  SaveButton.Caption := oisSave;
   AddButtons;
   IDEDialogLayoutList.ApplyLayout(Self);
 end;