IDE: improved and enabled hints for "store in session" checkboxes in value converters and value formatters debugger options frames

This commit is contained in:
Maxim Ganetsky 2024-02-12 18:27:26 +03:00
parent d818b67429
commit ff0592d20d
3 changed files with 131 additions and 50 deletions

View File

@ -9,51 +9,85 @@ object IdeProjectValConvOptionsFrame: TIdeProjectValConvOptionsFrame
DesignLeft = 471
DesignTop = 200
inline DbgValConvFrame1: TIdeDbgValConvFrame
Height = 300
Top = 71
Height = 291
Top = 80
Width = 510
Align = alClient
ClientHeight = 300
ClientHeight = 291
ClientWidth = 510
inherited Panel1: TPanel
Width = 510
ClientWidth = 510
inherited lstConverters: TCheckListBox
Width = 330
TopIndex = -1
end
inherited Panel2: TPanel
Left = 340
inherited btnAdd: TButton
Height = 32
end
inherited btnRemove: TButton
Height = 32
Top = 42
end
inherited btnUp: TButton
Height = 32
Top = 86
OnClick = nil
end
inherited btnDown: TButton
Height = 32
Top = 123
end
end
end
inherited pnlCurrentConv: TPanel
Height = 143
Height = 133
Width = 510
ClientHeight = 143
ClientHeight = 133
ClientWidth = 510
inherited Panel4: TPanel
Left = 340
Height = 123
ClientHeight = 123
Height = 112
Top = 21
ClientHeight = 112
inherited lblAction: TLabel
Height = 16
end
inherited dropAction: TComboBox
Height = 32
Top = 26
ItemHeight = 0
end
end
inherited lblDesc: TLabel
Height = 16
Width = 500
end
inherited Panel5: TPanel
Height = 123
Height = 112
Top = 21
Width = 340
ClientHeight = 123
ClientHeight = 112
ClientWidth = 340
inherited lblName: TLabel
Height = 16
Width = 330
end
inherited EdName: TEdit
Height = 33
Top = 26
Width = 330
end
inherited lblTypeNames: TLabel
Height = 16
Top = 64
Width = 330
end
inherited memoTypeNames: TMemo
Height = 45
Height = 33
Top = 85
Width = 330
end
end
@ -62,13 +96,14 @@ object IdeProjectValConvOptionsFrame: TIdeProjectValConvOptionsFrame
Width = 510
end
inherited pnlCurConvSetting: TPanel
Top = 300
Height = 1
Top = 290
Width = 510
end
end
object Panel1: TPanel
Left = 0
Height = 56
Height = 64
Top = 0
Width = 510
Align = alTop
@ -82,38 +117,40 @@ object IdeProjectValConvOptionsFrame: TIdeProjectValConvOptionsFrame
ChildSizing.ShrinkHorizontal = crsHomogenousChildResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 2
ClientHeight = 56
ClientHeight = 64
ClientWidth = 510
TabOrder = 1
object chkUseProjList: TCheckBox
Left = 6
Height = 19
Height = 23
Top = 6
Width = 249
Width = 250
Caption = 'chkUseProjList'
TabOrder = 0
end
object chkUseGlobalList: TCheckBox
Left = 261
Height = 19
Left = 262
Height = 23
Top = 6
Width = 243
Width = 242
Caption = 'chkUseGlobalList'
TabOrder = 1
end
object chkStoreInSession: TCheckBox
Left = 6
Height = 19
Top = 31
Width = 249
Height = 23
Top = 35
Width = 250
Caption = 'chkStoreInSession'
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
end
object DividerBevel1: TDividerBevel
Left = 0
Height = 15
Top = 56
Height = 16
Top = 64
Width = 510
Align = alTop
Font.Style = [fsBold]

View File

@ -10,7 +10,7 @@ object IdeProjectValueFormatterOptionsFrame: TIdeProjectValueFormatterOptionsFra
DesignTop = 120
object Panel1: TPanel
Left = 0
Height = 56
Height = 64
Top = 0
Width = 412
Align = alTop
@ -24,49 +24,51 @@ object IdeProjectValueFormatterOptionsFrame: TIdeProjectValueFormatterOptionsFra
ChildSizing.ShrinkHorizontal = crsHomogenousChildResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 2
ClientHeight = 56
ClientHeight = 64
ClientWidth = 412
TabOrder = 0
object chkUseProjList: TCheckBox
Left = 6
Height = 19
Height = 23
Top = 6
Width = 200
Width = 201
Caption = 'chkUseProjList'
TabOrder = 0
end
object chkUseGlobalList: TCheckBox
Left = 212
Height = 19
Left = 213
Height = 23
Top = 6
Width = 194
Width = 193
Caption = 'chkUseGlobalList'
TabOrder = 1
end
object chkStoreInSession: TCheckBox
Left = 6
Height = 19
Top = 31
Width = 200
Height = 23
Top = 35
Width = 201
Caption = 'chkStoreInSession'
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
end
object DividerBevel1: TDividerBevel
Left = 0
Height = 15
Top = 56
Height = 16
Top = 64
Width = 412
Align = alTop
Font.Style = [fsBold]
ParentFont = False
end
inline IdeDbgVarFormatterFrame1: TIdeDbgVarFormatterFrame
Height = 256
Top = 71
Height = 247
Top = 80
Width = 412
Align = alClient
ClientHeight = 256
ClientHeight = 247
ClientWidth = 412
TabOrder = 1
inherited Panel1: TPanel
@ -74,9 +76,30 @@ object IdeProjectValueFormatterOptionsFrame: TIdeProjectValueFormatterOptionsFra
ClientWidth = 412
inherited lstFormatters: TCheckListBox
Width = 232
TopIndex = -1
end
inherited Panel2: TPanel
Left = 242
inherited dropAction: TComboBox
Height = 32
ItemHeight = 0
end
inherited btnAdd: TButton
Height = 32
Top = 42
end
inherited btnRemove: TButton
Height = 32
Top = 79
end
inherited btnUp: TButton
Height = 32
Top = 123
end
inherited btnDown: TButton
Height = 32
Top = 160
end
end
end
inherited pnlCurrentFormatter: TPanel
@ -85,33 +108,54 @@ object IdeProjectValueFormatterOptionsFrame: TIdeProjectValueFormatterOptionsFra
ClientHeight = 120
ClientWidth = 412
inherited lblDesc: TLabel
Height = 16
Width = 402
end
inherited Panel5: TPanel
Height = 100
Width = 412
ClientHeight = 100
ClientWidth = 412
Height = 99
Top = 21
Width = 166
ClientHeight = 99
ClientWidth = 166
inherited lblName: TLabel
Width = 402
Height = 16
Width = 156
end
inherited EdName: TEdit
Width = 402
Height = 33
Top = 26
Width = 156
end
inherited lblTypeNames: TLabel
Width = 402
Height = 16
Top = 64
Width = 156
end
inherited memoTypeNames: TMemo
Height = 22
Width = 402
Height = 33
Top = 82
Width = 156
end
inherited cbAppendOriginalValue: TComboBox
Height = 32
Top = 61
Width = 154
ItemHeight = 0
end
end
inherited clDisplayFormat: TCheckListBox
Left = 166
Height = 99
Top = 21
TopIndex = -1
end
end
inherited Splitter1: TSplitter
Width = 412
end
inherited pnlCurFormatterSetting: TPanel
Top = 256
Height = 1
Top = 246
Width = 412
end
end

View File

@ -6366,12 +6366,12 @@ resourcestring
+'. The project specific backends (below) are by default stored in the LPI.';
drsStoreConverterConfigInSes = 'Store converter config in session';
drsThisOnlyAffectsTheListOfC = 'This only affects the list of converters '
+'below. The options setting which list to use are always stored in the session.';
+'below. The settings which list to use are always stored in the session.';
drsUseTheIDEGlobalListOfConv = 'Use the IDE-Global list of converters';
drsUseTheProjectListOfConver = 'Use the project list of converters';
drsStoreFormatterConfigInSes = 'Store formatter config in session';
drsThisOnlyAffectsTheListOfFormatter = 'This only affects the list of formatters '
+'below. The options setting which list to use are always stored in the session.';
+'below. The settings which list to use are always stored in the session.';
drsUseTheIDEGlobalListOfFormatter = 'Use the IDE-Global list of formatters';
drsUseTheProjectListOfFormatter = 'Use the project list of formatters';