paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 10:39:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: improved Editor Toolbar options page layout/i18n

Browse Source 
git-svn-id: trunk@49951 -
This commit is contained in:
maxim 2015-10-05 23:00:40 +00:00
parent 1d7c4f7d59
commit 4fe4e35ac1
3 changed files with 29 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
ide/frames/editortoolbar_options.lfm
View File

@ -21,7 +21,7 @@ object EditorToolbarOptionsFrame: TEditorToolbarOptionsFrame
TabOrder = 0 TabOrder = 0
object dbGeneralSettings: TDividerBevel object dbGeneralSettings: TDividerBevel
Left = 0 Left = 0
Height = 17 Height = 15
Top = 5 Top = 5
Width = 503 Width = 503
Caption = 'Editor Toolbars Settings' Caption = 'Editor Toolbars Settings'
@ -36,11 +36,10 @@ object EditorToolbarOptionsFrame: TEditorToolbarOptionsFrame
AnchorSideLeft.Control = pnTop AnchorSideLeft.Control = pnTop
AnchorSideTop.Control = dbGeneralSettings AnchorSideTop.Control = dbGeneralSettings
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 0
Height = 22 Height = 19
Top = 34 Top = 32
Width = 119 Width = 108
BorderSpacing.Left = 6
BorderSpacing.Top = 12 BorderSpacing.Top = 12
Caption = 'Toolbar is visible' Caption = 'Toolbar is visible'
OnClick = cbCoolBarVisibleClick OnClick = cbCoolBarVisibleClick
@ -61,10 +60,10 @@ object EditorToolbarOptionsFrame: TEditorToolbarOptionsFrame
AnchorSideTop.Control = cbCoolBarVisible AnchorSideTop.Control = cbCoolBarVisible
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 0
Height = 29 Height = 25
Top = 70 Top = 65
Width = 69 Width = 79
AutoSize = True AutoSize = True
BorderSpacing.Top = 14 BorderSpacing.Top = 14
Caption = 'Configure' Caption = 'Configure'
@ -78,10 +77,10 @@ object EditorToolbarOptionsFrame: TEditorToolbarOptionsFrame
AnchorSideRight.Control = cbPos AnchorSideRight.Control = cbPos
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 379 Left = 168
Height = 29 Height = 25
Top = 70 Top = 65
Width = 105 Width = 110
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
AutoSize = True AutoSize = True
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -90,31 +89,31 @@ object EditorToolbarOptionsFrame: TEditorToolbarOptionsFrame
TabOrder = 3 TabOrder = 3
end end
object lblpos: TLabel object lblpos: TLabel
AnchorSideLeft.Control = cbCoolBarVisible
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbPos AnchorSideTop.Control = cbCoolBarVisible
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = cbPos Left = 140
Left = 343 Height = 15
Height = 17 Top = 34
Top = 37 Width = 32
Width = 35 BorderSpacing.Left = 32
Anchors = [akTop, akRight]
BorderSpacing.Right = 6 BorderSpacing.Right = 6
Caption = 'lblpos' Caption = 'lblpos'
ParentColor = False ParentColor = False
end end
object cbPos: TComboBox object cbPos: TComboBox
AnchorSideLeft.Control = lblpos
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbCoolBarVisible AnchorSideTop.Control = lblpos
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 384 Left = 178
Height = 23 Height = 23
Top = 34 Top = 30
Width = 100 Width = 100
Anchors = [akTop, akRight]
BorderSpacing.Bottom = 6 BorderSpacing.Bottom = 6
ItemHeight = 17 ItemHeight = 15
ItemIndex = 0 ItemIndex = 0
Items.Strings = ( Items.Strings = (
'Top' 'Top'
@ -129,6 +128,6 @@ object EditorToolbarOptionsFrame: TEditorToolbarOptionsFrame
end end
end end
object imButtons: TImageList object imButtons: TImageList
left = 464 left = 304
end end
end end

2
ide/frames/editortoolbar_options.pas
View File

@ -100,7 +100,7 @@ begin
cbPos.Items[i] := sLocalizedPosValues[i]; // localized cbPos.Items[i] := sLocalizedPosValues[i]; // localized
cbPos.Caption := cbPos.Items[cbPos.ItemIndex]; cbPos.Caption := cbPos.Items[cbPos.ItemIndex];
dbGeneralSettings.Caption := 'Editor Toolbars Settings'; // ToDo: Will be removed ... dbGeneralSettings.Caption := lisEditorToolbarSettings; // ToDo: Will be removed ...
cbCoolBarVisible.Caption := lisEditorToolbarVisible; cbCoolBarVisible.Caption := lisEditorToolbarVisible;
lblpos.Caption := lisPosition; lblpos.Caption := lisPosition;
bDefaultToolbar.Caption := lisCmpRestoreDefaults; bDefaultToolbar.Caption := lisCmpRestoreDefaults;

3
ide/lazarusidestrconsts.pas
View File

@ -4640,7 +4640,8 @@ resourcestring
lisEditorToolbar = 'Editor ToolBar'; lisEditorToolbar = 'Editor ToolBar';
lisEditorToolbarHint = 'You may add here your favorite commands'; lisEditorToolbarHint = 'You may add here your favorite commands';
lisConfigureEditorToolbar = 'Configure Toolbar'; lisConfigureEditorToolbar = 'Configure Toolbar';
lisEditorToolbarVisible = 'EditorToolbar is &visible'; lisEditorToolbarVisible = 'Editor Toolbar is &visible';
lisEditorToolbarSettings = 'Editor Toolbar Settings';
lisPosition = 'Position'; lisPosition = 'Position';
// components palette settings and list form // components palette settings and list form