IDE: debugger options: added label for hint that the exceptions are project specific

git-svn-id: trunk@23026 -

debugger/frames/debugger_language_exceptions_options.lfm

@@ -5,8 +5,8 @@ inherited DebuggerLanguageExceptionsOptions: TDebuggerLanguageExceptionsOptions
   ClientWidth = 448
   TabOrder = 0
   Visible = False
-  DesignLeft = 132
+  DesignLeft = 312
-  DesignTop = 174
+  DesignTop = 189
   object bgIgnoreExceptions: TGroupBox[0]
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Owner
@@ -14,38 +14,40 @@ inherited DebuggerLanguageExceptionsOptions: TDebuggerLanguageExceptionsOptions
     AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = chkNotifyOnException
     Left = 0
-    Height = 398
+    Height = 393
     Top = 0
     Width = 448
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Bottom = 6
     Caption = 'Ignore these exceptions'
-    ClientHeight = 380
+    ClientHeight = 374
     ClientWidth = 444
     TabOrder = 0
     object clbExceptions: TCheckListBox
       AnchorSideLeft.Control = bgIgnoreExceptions
-      AnchorSideTop.Control = bgIgnoreExceptions
+      AnchorSideTop.Control = DbgLangExceptHint
+      AnchorSideTop.Side = asrBottom
       AnchorSideRight.Control = bgIgnoreExceptions
       AnchorSideRight.Side = asrBottom
       AnchorSideBottom.Control = cmdExceptionAdd
       Left = 6
-      Height = 339
+      Height = 303
-      Top = 6
+      Top = 30
       Width = 432
       Anchors = [akTop, akLeft, akRight, akBottom]
       BorderSpacing.Around = 6
       ItemHeight = 0
       OnClick = clbExceptionsClick
       TabOrder = 0
+      TopIndex = -1
     end
     object cmdExceptionAdd: TBitBtn
       AnchorSideRight.Control = cmdExceptionRemove
       AnchorSideBottom.Control = bgIgnoreExceptions
       AnchorSideBottom.Side = asrBottom
       Left = 282
-      Height = 23
+      Height = 29
-      Top = 351
+      Top = 339
       Width = 75
       Anchors = [akRight, akBottom]
       AutoSize = True
@@ -62,8 +64,8 @@ inherited DebuggerLanguageExceptionsOptions: TDebuggerLanguageExceptionsOptions
       AnchorSideBottom.Control = bgIgnoreExceptions
       AnchorSideBottom.Side = asrBottom
       Left = 363
-      Height = 23
+      Height = 29
-      Top = 351
+      Top = 339
       Width = 75
       Anchors = [akRight, akBottom]
       AutoSize = True
@@ -75,15 +77,25 @@ inherited DebuggerLanguageExceptionsOptions: TDebuggerLanguageExceptionsOptions
       OnClick = cmdExceptionRemoveClick
       TabOrder = 2
     end
+    object DbgLangExceptHint: TLabel
+      Left = 6
+      Height = 18
+      Top = 6
+      Width = 432
+      Align = alTop
+      BorderSpacing.Around = 6
+      Caption = 'DbgLangExceptHint'
+      ParentColor = False
+    end
   end
   object chkNotifyOnException: TCheckBox[1]
     AnchorSideLeft.Control = Owner
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 0
-    Height = 17
+    Height = 22
-    Top = 404
+    Top = 399
-    Width = 156
+    Width = 208
     Anchors = [akLeft, akBottom]
     Caption = 'Break on Lazarus Exceptions'
     TabOrder = 1

debugger/frames/debugger_language_exceptions_options.lrs

@@ -3,36 +3,39 @@
 LazarusResources.Add('TDebuggerLanguageExceptionsOptions','FORMDATA',[
   'TPF0'#241'"TDebuggerLanguageExceptionsOptions!DebuggerLanguageExceptionsOpti'
   +'ons'#6'Height'#3#165#1#5'Width'#3#192#1#12'ClientHeight'#3#165#1#11'ClientW'
-  +'idth'#3#192#1#8'TabOrder'#2#0#7'Visible'#8#10'DesignLeft'#3#132#0#9'DesignT'
+  +'idth'#3#192#1#8'TabOrder'#2#0#7'Visible'#8#10'DesignLeft'#3'8'#1#9'DesignTo'
-  +'op'#3#174#0#0#242#2#0#9'TGroupBox'#18'bgIgnoreExceptions'#22'AnchorSideLeft'
+  +'p'#3#189#0#0#242#2#0#9'TGroupBox'#18'bgIgnoreExceptions'#22'AnchorSideLeft.'
-  +'.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRigh'
+  +'Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight'
-  +'t.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSide'
+  +'.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideB'
-  +'Bottom.Control'#7#20'chkNotifyOnException'#4'Left'#2#0#6'Height'#3#142#1#3
+  +'ottom.Control'#7#20'chkNotifyOnException'#4'Left'#2#0#6'Height'#3#137#1#3'T'
-  +'Top'#2#0#5'Width'#3#192#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akB'
+  +'op'#2#0#5'Width'#3#192#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBo'
-  +'ottom'#0#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#23'Ignore these exceptio'
+  +'ttom'#0#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#23'Ignore these exception'
-  +'ns'#12'ClientHeight'#3'|'#1#11'ClientWidth'#3#188#1#8'TabOrder'#2#0#0#13'TC'
+  +'s'#12'ClientHeight'#3'v'#1#11'ClientWidth'#3#188#1#8'TabOrder'#2#0#0#13'TCh'
-  +'heckListBox'#13'clbExceptions'#22'AnchorSideLeft.Control'#7#18'bgIgnoreExce'
+  +'eckListBox'#13'clbExceptions'#22'AnchorSideLeft.Control'#7#18'bgIgnoreExcep'
-  +'ptions'#21'AnchorSideTop.Control'#7#18'bgIgnoreExceptions'#23'AnchorSideRig'
+  +'tions'#21'AnchorSideTop.Control'#7#17'DbgLangExceptHint'#18'AnchorSideTop.S'
-  +'ht.Control'#7#18'bgIgnoreExceptions'#20'AnchorSideRight.Side'#7#9'asrBottom'
+  +'ide'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#18'bgIgnoreExceptions'#20
-  +#24'AnchorSideBottom.Control'#7#15'cmdExceptionAdd'#4'Left'#2#6#6'Height'#3
+  +'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#15'cmdE'
-  +'S'#1#3'Top'#2#6#5'Width'#3#176#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+  +'xceptionAdd'#4'Left'#2#6#6'Height'#3'/'#1#3'Top'#2#30#5'Width'#3#176#1#7'An'
-  +#8'akBottom'#0#20'BorderSpacing.Around'#2#6#10'ItemHeight'#2#0#7'OnClick'#7
+  +'chors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#20'BorderSpacing.Arou'
-  +#18'clbExceptionsClick'#8'TabOrder'#2#0#0#0#7'TBitBtn'#15'cmdExceptionAdd'#23
+  +'nd'#2#6#10'ItemHeight'#2#0#7'OnClick'#7#18'clbExceptionsClick'#8'TabOrder'#2
-  +'AnchorSideRight.Control'#7#18'cmdExceptionRemove'#24'AnchorSideBottom.Contr'
+  +#0#8'TopIndex'#2#255#0#0#7'TBitBtn'#15'cmdExceptionAdd'#23'AnchorSideRight.C'
-  +'ol'#7#18'bgIgnoreExceptions'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Lef'
+  +'ontrol'#7#18'cmdExceptionRemove'#24'AnchorSideBottom.Control'#7#18'bgIgnore'
-  +'t'#3#26#1#6'Height'#2#23#3'Top'#3'_'#1#5'Width'#2'K'#7'Anchors'#11#7'akRigh'
+  +'Exceptions'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#26#1#6'Heigh'
-  +'t'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3
+  +'t'#2#29#3'Top'#3'S'#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8
-  +'Add'#20'Constraints.MinWidth'#2'K'#9'NumGlyphs'#2#0#7'OnClick'#7#20'cmdExce'
+  +'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'Add'#20'Constraints'
-  +'ptionAddClick'#8'TabOrder'#2#1#0#0#7'TBitBtn'#18'cmdExceptionRemove'#23'Anc'
+  +'.MinWidth'#2'K'#9'NumGlyphs'#2#0#7'OnClick'#7#20'cmdExceptionAddClick'#8'Ta'
-  +'horSideRight.Control'#7#18'bgIgnoreExceptions'#20'AnchorSideRight.Side'#7#9
+  +'bOrder'#2#1#0#0#7'TBitBtn'#18'cmdExceptionRemove'#23'AnchorSideRight.Contro'
-  +'asrBottom'#24'AnchorSideBottom.Control'#7#18'bgIgnoreExceptions'#21'AnchorS'
+  +'l'#7#18'bgIgnoreExceptions'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'Anch'
-  +'ideBottom.Side'#7#9'asrBottom'#4'Left'#3'k'#1#6'Height'#2#23#3'Top'#3'_'#1#5
+  +'orSideBottom.Control'#7#18'bgIgnoreExceptions'#21'AnchorSideBottom.Side'#7#9
-  +'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderS'
+  +'asrBottom'#4'Left'#3'k'#1#6'Height'#2#29#3'Top'#3'S'#1#5'Width'#2'K'#7'Anch'
-  +'pacing.Around'#2#6#7'Caption'#6#6'Remove'#20'Constraints.MinWidth'#2'K'#7'E'
+  +'ors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6
-  +'nabled'#8#9'NumGlyphs'#2#0#7'OnClick'#7#23'cmdExceptionRemoveClick'#8'TabOr'
+  +#7'Caption'#6#6'Remove'#20'Constraints.MinWidth'#2'K'#7'Enabled'#8#9'NumGlyp'
-  +'der'#2#2#0#0#0#242#2#1#9'TCheckBox'#20'chkNotifyOnException'#22'AnchorSideL'
+  +'hs'#2#0#7'OnClick'#7#23'cmdExceptionRemoveClick'#8'TabOrder'#2#2#0#0#6'TLab'
-  +'eft.Control'#7#5'Owner'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSi'
+  +'el'#17'DbgLangExceptHint'#4'Left'#2#6#6'Height'#2#18#3'Top'#2#6#5'Width'#3
-  +'deBottom.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#17#3'Top'#3#148#1#5'W'
+  +#176#1#5'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'DbgL'
-  +'idth'#3#156#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#27'Break o'
+  +'angExceptHint'#11'ParentColor'#8#0#0#0#242#2#1#9'TCheckBox'#20'chkNotifyOnE'
-  +'n Lazarus Exceptions'#8'TabOrder'#2#1#0#0#0
+  +'xception'#22'AnchorSideLeft.Control'#7#5'Owner'#24'AnchorSideBottom.Control'
+  +#7#5'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2
+  +#22#3'Top'#3#143#1#5'Width'#3#208#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7
+  +'Caption'#6#27'Break on Lazarus Exceptions'#8'TabOrder'#2#1#0#0#0
 ]);

debugger/frames/debugger_language_exceptions_options.pas

@@ -39,6 +39,7 @@ type
     clbExceptions: TCheckListBox;
     cmdExceptionAdd: TBitBtn;
     cmdExceptionRemove: TBitBtn;
+    DbgLangExceptHint: TLabel;
     procedure clbExceptionsClick(Sender: TObject);
     procedure cmdExceptionAddClick(Sender: TObject);
     procedure cmdExceptionRemoveClick(Sender: TObject);
@@ -142,6 +143,7 @@ procedure TDebuggerLanguageExceptionsOptions.Setup(
   ADialog: TAbstractOptionsEditorDialog);
 begin
   bgIgnoreExceptions.Caption := lisDebugOptionsFrmIgnoreTheseExceptions;
+  DbgLangExceptHint.Caption := lisTheseSettingsAreStoredWithTheProject;
   cmdExceptionRemove.Caption := lisExtToolRemove;
   cmdExceptionAdd.Caption := lisCodeTemplAdd;
   cmdExceptionRemove.LoadGlyphFromLazarusResource('laz_delete');

ide/lazarusidestrconsts.pas

@@ -3113,6 +3113,8 @@ resourcestring
   lisExtToolUnableToRunTheTool = 'Unable to run the tool %s%s%s:%s%s';
   lisExtToolExternalTools = 'External tools';
   lisExtToolRemove = 'Remove';
+  lisTheseSettingsAreStoredWithTheProject = 'These settings are stored with '
+    +'the project.';
   lisKeepThemAndContinue = 'Keep them and continue';
   lisRemoveThem = 'Remove them';
   lisExtToolMoveUp = 'Up';