IDE: Fix tab order and set shortcuts in Application Options frame.

git-svn-id: trunk@36777 -

ide/frames/project_application_options.lfm

@@ -10,13 +10,13 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
   DesignTop = 290
   object AppSettingsGroupBox: TGroupBox
     Left = 0
-    Height = 356
+    Height = 362
     Top = 0
     Width = 522
     Align = alTop
     AutoSize = True
     Caption = 'AppSettingsGroupBox'
-    ClientHeight = 338
+    ClientHeight = 344
     ClientWidth = 518
     TabOrder = 0
     object TitleLabel: TLabel
@@ -24,9 +24,9 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Control = TitleEdit
       AnchorSideTop.Side = asrCenter
       Left = 6
-      Height = 16
-      Top = 9
-      Width = 52
+      Height = 15
+      Top = 11
+      Width = 51
       BorderSpacing.Left = 6
       Caption = 'TitleLabel'
       ParentColor = False
@@ -35,9 +35,9 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideLeft.Control = AppSettingsGroupBox
       AnchorSideTop.Control = IconPanel
       Left = 6
-      Height = 16
-      Top = 35
-      Width = 52
+      Height = 15
+      Top = 36
+      Width = 49
       BorderSpacing.Left = 6
       Caption = 'IconLabel'
       ParentColor = False
@@ -49,9 +49,9 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Side = asrCenter
       AnchorSideRight.Control = IconTrack
       Left = 240
-      Height = 16
-      Top = 175
-      Width = 81
+      Height = 15
+      Top = 177
+      Width = 75
       BorderSpacing.Left = 6
       BorderSpacing.Right = 6
       Caption = 'IconTrackLabel'
@@ -59,7 +59,7 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
     end
     object TitleEdit: TEdit
       Left = 106
-      Height = 23
+      Height = 24
       Top = 6
       Width = 406
       Align = alTop
@@ -73,25 +73,25 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Control = IconTrack
       AnchorSideTop.Side = asrBottom
       Left = 6
-      Height = 19
-      Top = 209
-      Width = 150
+      Height = 20
+      Top = 210
+      Width = 145
       BorderSpacing.Around = 6
       Caption = 'UseAppBundleCheckBox'
-      TabOrder = 1
+      TabOrder = 6
     end
     object UseXPManifestCheckBox: TCheckBox
       AnchorSideLeft.Control = AppSettingsGroupBox
       AnchorSideTop.Control = UseAppBundleCheckBox
       AnchorSideTop.Side = asrBottom
       Left = 6
-      Height = 19
-      Top = 234
-      Width = 151
+      Height = 20
+      Top = 236
+      Width = 150
       BorderSpacing.Around = 6
       Caption = 'UseXPManifestCheckBox'
       OnChange = UseXPManifestCheckBoxChange
-      TabOrder = 2
+      TabOrder = 7
     end
     object IconPanel: TPanel
       AnchorSideLeft.Control = AppSettingsGroupBox
@@ -99,7 +99,7 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Side = asrBottom
       Left = 106
       Height = 128
-      Top = 35
+      Top = 36
       Width = 128
       BorderSpacing.Left = 106
       BorderSpacing.Top = 6
@@ -109,7 +109,7 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       BorderStyle = bsSingle
       ClientHeight = 124
       ClientWidth = 124
-      TabOrder = 3
+      TabOrder = 1
       object IconImage: TImage
         Left = 1
         Height = 122
@@ -128,14 +128,14 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideBottom.Side = asrBottom
       Left = 240
       Height = 25
-      Top = 35
-      Width = 111
+      Top = 36
+      Width = 93
       AutoSize = True
       BorderSpacing.Left = 6
       Caption = 'LoadIconButton'
       NumGlyphs = 0
       OnClick = LoadIconButtonClick
-      TabOrder = 4
+      TabOrder = 3
     end
     object SaveIconButton: TBitBtn
       AnchorSideLeft.Control = LoadIconButton
@@ -143,14 +143,14 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Side = asrBottom
       Left = 240
       Height = 25
-      Top = 66
-      Width = 109
+      Top = 67
+      Width = 92
       AutoSize = True
       BorderSpacing.Top = 6
       Caption = 'SaveIconButton'
       NumGlyphs = 0
       OnClick = SaveIconButtonClick
-      TabOrder = 5
+      TabOrder = 4
     end
     object ClearIconButton: TBitBtn
       AnchorSideLeft.Control = SaveIconButton
@@ -158,14 +158,14 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Side = asrBottom
       Left = 240
       Height = 25
-      Top = 97
-      Width = 112
+      Top = 98
+      Width = 95
       AutoSize = True
       BorderSpacing.Top = 6
       Caption = 'ClearIconButton'
       NumGlyphs = 0
       OnClick = ClearIconButtonClick
-      TabOrder = 6
+      TabOrder = 5
     end
     object IconTrack: TTrackBar
       AnchorSideLeft.Control = IconPanel
@@ -175,23 +175,23 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideRight.Side = asrBottom
       Left = 106
       Height = 40
-      Top = 163
+      Top = 164
       Width = 128
       Max = 0
       OnChange = IconTrackChange
       Position = 0
       ShowSelRange = False
       Anchors = [akTop, akLeft, akRight]
-      TabOrder = 7
+      TabOrder = 2
     end
     object DpiAwareCheckBox: TCheckBox
       AnchorSideLeft.Control = UseXPManifestCheckBox
       AnchorSideTop.Control = UseXPManifestCheckBox
       AnchorSideTop.Side = asrBottom
       Left = 12
-      Height = 19
-      Top = 259
-      Width = 123
+      Height = 20
+      Top = 262
+      Width = 122
       BorderSpacing.Around = 6
       Caption = 'DpiAwareCheckBox'
       TabOrder = 8
@@ -201,35 +201,35 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
       AnchorSideTop.Control = ExecutionLevelComboBox
       AnchorSideTop.Side = asrBottom
       Left = 12
-      Height = 19
-      Top = 313
-      Width = 119
+      Height = 20
+      Top = 318
+      Width = 117
       BorderSpacing.Around = 6
       Caption = 'UIAccessCheckBox'
-      TabOrder = 9
+      TabOrder = 10
     end
     object ExecutionLevelComboBox: TComboBox
       AnchorSideLeft.Control = ExecutionLevelLabel
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = DpiAwareCheckBox
       AnchorSideTop.Side = asrBottom
-      Left = 125
-      Height = 23
-      Top = 284
+      Left = 122
+      Height = 24
+      Top = 288
       Width = 223
       BorderSpacing.Around = 6
-      ItemHeight = 15
+      ItemHeight = 0
       Style = csDropDownList
-      TabOrder = 10
+      TabOrder = 9
     end
     object ExecutionLevelLabel: TLabel
       AnchorSideLeft.Control = UseXPManifestCheckBox
       AnchorSideTop.Control = ExecutionLevelComboBox
       AnchorSideTop.Side = asrCenter
       Left = 12
-      Height = 16
-      Top = 287
-      Width = 107
+      Height = 15
+      Top = 293
+      Width = 104
       BorderSpacing.Around = 6
       Caption = 'ExecutionLevelLabel'
       ParentColor = False
@@ -241,8 +241,8 @@ object ProjectApplicationOptionsFrame: TProjectApplicationOptionsFrame
     AnchorSideTop.Side = asrBottom
     Left = 0
     Height = 25
-    Top = 362
-    Width = 155
+    Top = 368
+    Width = 136
     AutoSize = True
     BorderSpacing.Top = 6
     Caption = 'CreateAppBundleButton'

ide/lazarusidestrconsts.pas

@@ -2199,9 +2199,9 @@ resourcestring
   dlgPORequireAdministrator = 'require administrator (requireAdministrator)';
   dlgPOExecutionLevel = 'Execution Level';
   dlgPOIcon = 'Icon:';
-  dlgPOLoadIcon = 'Load Icon';
-  dlgPOSaveIcon = 'Save Icon';
-  dlgPOClearIcon = 'Clear Icon';
+  dlgPOLoadIcon = '&Load Icon';
+  dlgPOSaveIcon = '&Save Icon';
+  dlgPOClearIcon = '&Clear Icon';
   dlgPOIconDesc = '(size: %d:%d, bpp: %d)';
   dlgPOIconDescNone = '(none)';