IDE, editor_color_options: Add some captions to tool-buttons

git-svn-id: trunk@61094 -
This commit is contained in:
martin 2019-04-30 21:03:08 +00:00
parent dd418297c7
commit f62d14900f
3 changed files with 10 additions and 5 deletions

View File

@ -48,6 +48,7 @@ object EditorColorOptionsFrame: TEditorColorOptionsFrame
BorderSpacing.Right = 3 BorderSpacing.Right = 3
Caption = 'ToolBar1' Caption = 'ToolBar1'
EdgeBorders = [ebBottom] EdgeBorders = [ebBottom]
List = True
ParentShowHint = False ParentShowHint = False
ShowCaptions = True ShowCaptions = True
ShowHint = True ShowHint = True
@ -56,7 +57,6 @@ object EditorColorOptionsFrame: TEditorColorOptionsFrame
Left = 115 Left = 115
Top = 0 Top = 0
OnClick = SetAttributeToDefaultButtonClick OnClick = SetAttributeToDefaultButtonClick
ShowCaption = False
end end
object ToolButton3: TToolButton object ToolButton3: TToolButton
Left = 107 Left = 107
@ -1130,6 +1130,7 @@ object EditorColorOptionsFrame: TEditorColorOptionsFrame
AutoSize = True AutoSize = True
Caption = 'ToolBar' Caption = 'ToolBar'
EdgeBorders = [ebBottom] EdgeBorders = [ebBottom]
List = True
ParentShowHint = False ParentShowHint = False
ShowCaptions = True ShowCaptions = True
ShowHint = True ShowHint = True
@ -1138,7 +1139,6 @@ object EditorColorOptionsFrame: TEditorColorOptionsFrame
Left = 1 Left = 1
Top = 0 Top = 0
OnClick = GeneralCheckBoxOnChange OnClick = GeneralCheckBoxOnChange
ShowCaption = False
Style = tbsCheck Style = tbsCheck
end end
object ToolButton2: TToolButton object ToolButton2: TToolButton
@ -1191,13 +1191,11 @@ object EditorColorOptionsFrame: TEditorColorOptionsFrame
Left = 239 Left = 239
Top = 0 Top = 0
OnClick = btnExportClick OnClick = btnExportClick
ShowCaption = False
end end
object SetAllAttributesToDefaultButton: TToolButton object SetAllAttributesToDefaultButton: TToolButton
Left = 262 Left = 262
Top = 0 Top = 0
OnClick = SetAllAttributesToDefaultButtonClick OnClick = SetAllAttributesToDefaultButtonClick
ShowCaption = False
end end
end end
object ExportSaveDialog: TSaveDialog object ExportSaveDialog: TSaveDialog

View File

@ -1480,16 +1480,20 @@ begin
UseSyntaxHighlightCheckBox.ImageIndex := IDEImages.LoadImage('laz_highlighter'); UseSyntaxHighlightCheckBox.ImageIndex := IDEImages.LoadImage('laz_highlighter');
UseSyntaxHighlightCheckBox.Caption := dlgUseHighlight;
UseSyntaxHighlightCheckBox.Hint := dlgUseSyntaxHighlight; UseSyntaxHighlightCheckBox.Hint := dlgUseSyntaxHighlight;
LanguageButton.Hint := dlgLang; LanguageButton.Hint := dlgLang;
ColorSchemeButton.Hint := dlgClrScheme; ColorSchemeButton.Hint := dlgClrScheme;
FileExtensionsComboBox.hint := dlgFileExts; FileExtensionsComboBox.hint := dlgFileExts;
SetAttributeToDefaultButton.ImageIndex := IDEImages.LoadImage('restore_default'); SetAttributeToDefaultButton.ImageIndex := IDEImages.LoadImage('restore_default');
SetAttributeToDefaultButton.Hint := dlgSetElementDefault; SetAttributeToDefaultButton.Hint := dlgSetElementDefault;
SetAttributeToDefaultButton.Caption := dlgReset;
SetAllAttributesToDefaultButton.ImageIndex := IDEImages.LoadImage('restore_defaults'); SetAllAttributesToDefaultButton.ImageIndex := IDEImages.LoadImage('restore_defaults');
SetAllAttributesToDefaultButton.Hint := dlgSetAllElementDefault; SetAllAttributesToDefaultButton.Hint := dlgSetAllElementDefault;
SetAllAttributesToDefaultButton.Caption := dlgResetAll;
btnExport.ImageIndex := IDEImages.LoadImage('laz_save'); btnExport.ImageIndex := IDEImages.LoadImage('laz_save');
btnExport.Hint := lisExport; btnExport.Caption := lisExport;
//btnExport.Hint := lisExport;
lbLocalGlobal.Caption := dlgThisElementUsesColor; lbLocalGlobal.Caption := dlgThisElementUsesColor;
rbGlobalAttr.Caption := dlgUseSchemeDefaults; rbGlobalAttr.Caption := dlgUseSchemeDefaults;

View File

@ -1722,6 +1722,7 @@ resourcestring
dlgUndoAfterSave = 'Undo after save'; dlgUndoAfterSave = 'Undo after save';
dlgFindTextatCursor = 'Find text at cursor'; dlgFindTextatCursor = 'Find text at cursor';
dlgUseHighlight = 'Use Highlight';
dlgUseSyntaxHighlight = 'Use syntax highlight'; dlgUseSyntaxHighlight = 'Use syntax highlight';
dlgUseCodeFolding = 'Code Folding'; dlgUseCodeFolding = 'Code Folding';
dlgCodeFoldEnableFold = 'Fold'; dlgCodeFoldEnableFold = 'Fold';
@ -1944,6 +1945,8 @@ resourcestring
dlgFileExts = 'File extensions'; dlgFileExts = 'File extensions';
dlgSetElementDefault = 'Set element to default'; dlgSetElementDefault = 'Set element to default';
dlgSetAllElementDefault = 'Set all elements to default'; dlgSetAllElementDefault = 'Set all elements to default';
dlgReset = 'Reset';
dlgResetAll = 'Reset all';
dlgThisElementUsesColor = 'The element uses (and edits) the schemes:'; dlgThisElementUsesColor = 'The element uses (and edits) the schemes:';
dlgUseSchemeDefaults = '- Scheme globals -'; dlgUseSchemeDefaults = '- Scheme globals -';
dlgUseSchemeLocal = 'selected language'; dlgUseSchemeLocal = 'selected language';