Merged revision(s) 55710 #ffa9234eee, 56134 #b7b6bf8878, 56136 #06038db5f4, 56144 #acc70e5dcd from trunk:

IDE: Improve CompilerOtherOptions frame layout. Issue #32272, patch from AlexeyT.
........
IDE: Update components_images.res (forgotten in r55966 #60baefff0d)
........
IDE: Improve the layout of Project Options -> FPDocEditor. Issue #32574.
........
IDE: High-DPI: Refreshed open icons. Issue #32595. Patch by FTurtle
........

git-svn-id: branches/fixes_1_8@56151 -

ide/frames/compiler_other_options.lfm

@@ -15,13 +15,13 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
     Width = 521
     Align = alBottom
     Caption = 'grpConditionals'
-    ClientHeight = 174
+    ClientHeight = 175
     ClientWidth = 517
     TabOrder = 0
     inline CondSynEdit: TSynEdit
       AnchorSideRight.Side = asrBottom
       Left = 0
-      Height = 151
+      Height = 154
       Top = 0
       Width = 517
       Align = alClient
@@ -651,8 +651,8 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
     end
     object CondStatusbar: TStatusBar
       Left = 0
-      Height = 23
-      Top = 151
+      Height = 21
+      Top = 154
       Width = 517
       Panels = <      
         item
@@ -683,7 +683,7 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
     Width = 521
     Align = alClient
     Caption = 'grpCustomOptions'
-    ClientHeight = 188
+    ClientHeight = 189
     ClientWidth = 517
     TabOrder = 2
     object memoCustomOptions: TMemo
@@ -692,9 +692,9 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
       AnchorSideBottom.Control = grpCustomOptions
       AnchorSideBottom.Side = asrBottom
       Left = 0
-      Height = 184
+      Height = 185
       Top = 4
-      Width = 362
+      Width = 355
       Anchors = [akTop, akLeft, akRight, akBottom]
       BorderSpacing.Right = 6
       OnChange = memoCustomOptionsChange
@@ -708,11 +708,12 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
       AnchorSideLeft.Control = btnDefines
       AnchorSideRight.Control = btnDefines
       AnchorSideRight.Side = asrBottom
-      Left = 368
-      Height = 22
+      Left = 361
+      Height = 29
       Top = 4
-      Width = 149
+      Width = 150
       Anchors = [akTop, akLeft, akRight]
+      AutoSize = True
       Caption = 'All options ...'
       OnClick = btnAllOptionsClick
       ParentShowHint = False
@@ -723,14 +724,18 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
       AnchorSideLeft.Control = btnAllOptions
       AnchorSideTop.Control = btnAllOptions
       AnchorSideTop.Side = asrBottom
+      AnchorSideRight.Control = grpCustomOptions
       AnchorSideRight.Side = asrBottom
-      Left = 368
-      Height = 22
-      Top = 32
-      Width = 149
+      Left = 361
+      Height = 29
+      Top = 39
+      Width = 150
       Anchors = [akTop, akRight]
+      AutoSize = True
       BorderSpacing.Top = 6
+      BorderSpacing.Right = 6
       Caption = 'Defines ...'
+      Constraints.MinWidth = 150
       OnClick = btnDefinesClick
       ParentShowHint = False
       ShowHint = True
@@ -742,12 +747,13 @@ object CompilerOtherOptionsFrame: TCompilerOtherOptionsFrame
       AnchorSideTop.Side = asrBottom
       AnchorSideRight.Control = btnDefines
       AnchorSideRight.Side = asrBottom
-      Left = 368
-      Height = 22
-      Top = 67
-      Width = 149
+      Left = 361
+      Height = 29
+      Top = 83
+      Width = 150
       Anchors = [akTop, akLeft, akRight]
-      BorderSpacing.Top = 13
+      AutoSize = True
+      BorderSpacing.Top = 15
       Caption = 'Add -FcUTF8'
       OnClick = btnFcUTF8Click
       ParentShowHint = False

ide/frames/project_lazdoc_options.lfm

@@ -14,8 +14,8 @@ object ProjectFPDocOptionsFrame: TProjectFPDocOptionsFrame
     AnchorSideTop.Side = asrCenter
     Left = 6
     Height = 15
-    Top = 10
-    Width = 138
+    Top = 13
+    Width = 155
     BorderSpacing.Around = 6
     Caption = 'FPDocPackageNameLabel'
     ParentColor = False
@@ -24,8 +24,8 @@ object ProjectFPDocOptionsFrame: TProjectFPDocOptionsFrame
     AnchorSideLeft.Control = FPDocPackageNameLabel
     AnchorSideLeft.Side = asrBottom
     AnchorSideTop.Control = Owner
-    Left = 150
-    Height = 23
+    Left = 167
+    Height = 29
     Top = 6
     Width = 120
     BorderSpacing.Around = 6
@@ -42,12 +42,12 @@ object ProjectFPDocOptionsFrame: TProjectFPDocOptionsFrame
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 0
-    Height = 234
-    Top = 35
+    Height = 228
+    Top = 41
     Width = 478
     Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'SearchPathsGroupBox'
-    ClientHeight = 214
+    ClientHeight = 201
     ClientWidth = 474
     TabOrder = 1
     object PathsListBox: TListBox
@@ -59,19 +59,18 @@ object ProjectFPDocOptionsFrame: TProjectFPDocOptionsFrame
       BorderSpacing.Around = 6
       ItemHeight = 0
       OnSelectionChange = PathsListBoxSelectionChange
-      ScrollWidth = 472
       TabOrder = 0
     end
     object AddPathButton: TBitBtn
       AnchorSideLeft.Control = SearchPathsGroupBox
+      AnchorSideTop.Control = PathsListBox
       AnchorSideTop.Side = asrBottom
       Left = 6
-      Height = 25
-      Top = 147
-      Width = 108
+      Height = 26
+      Top = 120
+      Width = 104
       AutoSize = True
-      BorderSpacing.Left = 6
-      BorderSpacing.Top = 6
+      BorderSpacing.Around = 6
       Caption = 'AddPathButton'
       Enabled = False
       OnClick = AddPathButtonClick
@@ -80,13 +79,13 @@ object ProjectFPDocOptionsFrame: TProjectFPDocOptionsFrame
     object DeletePathButton: TBitBtn
       AnchorSideLeft.Control = AddPathButton
       AnchorSideLeft.Side = asrBottom
-      AnchorSideTop.Side = asrBottom
+      AnchorSideTop.Control = AddPathButton
       Left = 120
-      Height = 25
-      Top = 147
-      Width = 119
+      Height = 26
+      Top = 120
+      Width = 120
       AutoSize = True
-      BorderSpacing.Around = 6
+      BorderSpacing.Left = 10
       Caption = 'DeletePathButton'
       Enabled = False
       OnClick = DeletePathButtonClick
@@ -94,20 +93,22 @@ object ProjectFPDocOptionsFrame: TProjectFPDocOptionsFrame
     end
     object PathEdit: TDirectoryEdit
       AnchorSideLeft.Control = SearchPathsGroupBox
-      AnchorSideTop.Control = PathsListBox
+      AnchorSideTop.Control = AddPathButton
       AnchorSideTop.Side = asrBottom
-      AnchorSideRight.Control = SearchPathsGroupBox
+      AnchorSideRight.Control = PathsListBox
       AnchorSideRight.Side = asrBottom
       Left = 6
-      Height = 23
-      Top = 120
+      Height = 29
+      Top = 152
       Width = 462
       Directory = 'PathEdit'
       ShowHidden = False
       ButtonWidth = 45
       NumGlyphs = 1
       Anchors = [akTop, akLeft, akRight]
-      BorderSpacing.Around = 6
+      BorderSpacing.Left = 6
+      BorderSpacing.Top = 6
+      BorderSpacing.Bottom = 6
       MaxLength = 0
       TabOrder = 1
       OnChange = PathEditChange

ide/frames/project_lazdoc_options.pas

@@ -48,9 +48,9 @@ end;
 
 procedure TProjectFPDocOptionsFrame.Setup(ADialog: TAbstractOptionsEditorDialog);
 begin
-  FPDocPackageNameEdit.Hint:=lisFPDocPackageNameDefaultIsProjectFileName;
-  FPDocPackageNameLabel.Caption:=lisFPDocPackageName;
-  SearchPathsGroupBox.Caption:=lisSearchPaths2;
+  FPDocPackageNameEdit.Hint := lisFPDocPackageNameDefaultIsProjectFileName;
+  FPDocPackageNameLabel.Caption := lisFPDocPackageName;
+  SearchPathsGroupBox.Caption := lisSearchPaths2;
   AddPathButton.Caption := lisCodeHelpAddPathButton;
   DeletePathButton.Caption := lisCodeHelpDeletePathButton;
   TIDEImages.AssignImage(DeletePathButton.Glyph, 'laz_delete');