IDE: "Tab Order Editor" -> "Tab Order"

git-svn-id: trunk@30389 -
This commit is contained in:
juha 2011-04-19 21:38:47 +00:00
parent 12e3b2bf20
commit c1c6acdc2b
7 changed files with 13 additions and 13 deletions

View File

@ -529,7 +529,7 @@ begin
DesignerMenuAnchorEditor:=RegisterIDEMenuCommand(DesignerMenuSectionOrder,
'Anchor Editor',lisMenuViewAnchorEditor, nil, nil, nil, 'menu_view_anchor_editor');
DesignerMenuTabOrder:=RegisterIDEMenuCommand(DesignerMenuSectionOrder,
'Tab order',lisMenuViewTabOrderEditor, nil, nil, nil, 'tab_order');
'Tab order',lisMenuViewTabOrder, nil, nil, nil, 'tab_order');
DesignerMenuSectionZOrder:=RegisterIDESubMenu(DesignerMenuSectionOrder,
'ZOrder section', fdmZOrder);
DesignerMenuOrderMoveToFront:=RegisterIDEMenuCommand(DesignerMenuSectionZOrder,

View File

@ -2086,7 +2086,7 @@ begin
ecViewUnitDependencies : Result:= srkmecViewUnitDependencies;
ecViewUnitInfo : Result:= srkmecViewUnitInfo;
ecViewAnchorEditor : Result:= srkmecViewAnchorEditor;
ecViewTabOrderEditor : Result:= srkmecViewTabOrderEditor;
ecViewTabOrder : Result:= srkmecViewTabOrder;
ecToggleCodeBrowser : Result:= srkmecToggleCodeBrowser;
ecToggleRestrictionBrowser: Result:= srkmecToggleRestrictionBrowser;
ecViewComponents : Result:= srkmecViewComponents;
@ -2758,7 +2758,7 @@ begin
AddDefault(C, 'View Unit Info', lisKMViewUnitInfo, ecViewUnitInfo);
AddDefault(C, 'Toggle between Unit and Form', lisKMToggleBetweenUnitAndForm, ecToggleFormUnit);
AddDefault(C, 'View Anchor Editor', lisMenuViewAnchorEditor, ecViewAnchorEditor);
AddDefault(C, 'View Tab Order Editor', lisMenuViewTabOrderEditor, ecViewTabOrderEditor);
AddDefault(C, 'View Tab Order', lisMenuViewTabOrder, ecViewTabOrder);
AddDefault(C, 'Toggle view component palette', lisKMToggleViewComponentPalette, ecToggleCompPalette);
AddDefault(C, 'Toggle view IDE speed buttons', lisKMToggleViewIDESpeedButtons, ecToggleIDESpeedBtns);

View File

@ -292,7 +292,7 @@ resourcestring
lisSaveAllMessagesToFile = 'Save all messages to file';
lisMenuViewSearchResults = 'Search Results';
lisMenuViewAnchorEditor = 'Anchor Editor';
lisMenuViewTabOrderEditor = 'Tab Order Editor';
lisMenuViewTabOrder = 'Tab Order';
lisKMToggleViewComponentPalette = 'Toggle view component palette';
lisMenuViewComponentPalette = 'Component Palette';
lisMenuViewTodoList = 'ToDo List';
@ -2610,7 +2610,7 @@ resourcestring
srkmecViewUnitDependencies = 'View unit dependencies';
srkmecViewUnitInfo = 'View unit information';
srkmecViewAnchorEditor = 'View anchor editor';
srkmecViewTabOrderEditor = 'View Tab Order editor';
srkmecViewTabOrder = 'View Tab Order';
srkmecToggleCodeBrowser = 'View code browser';
srkmecToggleRestrictionBrowser = 'View restriction browser';
srkmecToggleCompPalette = 'View component palette';

View File

@ -248,7 +248,7 @@ type
procedure mnuViewSearchResultsClick(Sender: TObject);
procedure mnuToggleFormUnitClicked(Sender: TObject);
procedure mnuViewAnchorEditorClicked(Sender: TObject);
procedure mnuViewTabOrderEditorClicked(Sender: TObject);
procedure mnuViewTabOrderClicked(Sender: TObject);
procedure mnuViewComponentPaletteClicked(Sender: TObject);
procedure mnuViewIDESpeedButtonsClicked(Sender: TObject);
procedure mnuViewFPCInfoClicked(Sender: TObject);
@ -2031,7 +2031,7 @@ begin
EnvironmentOptions.ObjectInspectorOptions.AssignTo(ObjectInspector1);
ShowAnchorDesigner:=@mnuViewAnchorEditorClicked;
ShowTabOrderEditor:=@mnuViewTabOrderEditorClicked;
ShowTabOrderEditor:=@mnuViewTabOrderClicked;
end;
procedure TMainIDE.SetupFormEditor;
@ -2503,7 +2503,7 @@ begin
itmViewMessage.OnClick := @mnuViewMessagesClick;
itmViewSearchResults.OnClick := @mnuViewSearchResultsClick;
itmViewAnchorEditor.OnClick := @mnuViewAnchorEditorClicked;
itmViewTabOrderEditor.OnClick := @mnuViewTabOrderEditorClicked;
itmViewTabOrder.OnClick := @mnuViewTabOrderClicked;
itmViewComponentPalette.OnClick := @mnuViewComponentPaletteClicked;
itmViewIDESpeedButtons.OnClick := @mnuViewIDESpeedButtonsClicked;
@ -2686,7 +2686,7 @@ begin
DoViewAnchorEditor(true);
end;
procedure TMainIDE.mnuViewTabOrderEditorClicked(Sender: TObject);
procedure TMainIDE.mnuViewTabOrderClicked(Sender: TObject);
begin
DoViewTabOrderEditor(true);
end;

View File

@ -177,7 +177,7 @@ type
itmViewToggleFormUnit: TIDEMenuCommand;
//itmViewSecondaryWindows: TIDEMenuSection;
itmViewAnchorEditor: TIDEMenuCommand;
itmViewTabOrderEditor: TIDEMenuCommand;
itmViewTabOrder: TIDEMenuCommand;
itmViewComponentPalette: TIDEMenuCommand;
itmViewIDESpeedButtons: TIDEMenuCommand;
itmViewMessage: TIDEMenuCommand;

View File

@ -517,7 +517,7 @@ begin
CreateMenuSeparatorSection(mnuView,itmViewDesignerWindows,'itmViewDesignerWindows');
ParentMI:=itmViewDesignerWindows;
CreateMenuItem(ParentMI,itmViewAnchorEditor,'itmViewAnchorEditor',lisMenuViewAnchorEditor,'menu_view_anchor_editor');
CreateMenuItem(ParentMI,itmViewTabOrderEditor,'itmViewTabOrderEditor',lisMenuViewTabOrderEditor,'tab_order');
CreateMenuItem(ParentMI,itmViewTabOrder,'itmViewTabOrder',lisMenuViewTabOrder,'tab_order');
CreateMenuSeparatorSection(mnuView,itmViewSecondaryWindows,'itmViewSecondaryWindows');
ParentMI:=itmViewSecondaryWindows;
@ -904,7 +904,7 @@ begin
itmViewMessage.Command:=GetCommand(ecToggleMessages);
itmViewSearchResults.Command:=GetCommand(ecToggleSearchResults);
itmViewAnchorEditor.Command:=GetCommand(ecViewAnchorEditor);
itmViewTabOrderEditor.Command:=GetCommand(ecViewTabOrderEditor);
itmViewTabOrder.Command:=GetCommand(ecViewTabOrder);
itmViewComponentPalette.Command:=GetCommand(ecToggleCompPalette);
itmViewIDESpeedButtons.Command:=GetCommand(ecToggleIDESpeedBtns);
itmJumpHistory.Command:=GetCommand(ecViewJumpHistory);

View File

@ -175,7 +175,7 @@ const
ecToggleCallStack = ecFirstLazarus + 315;
ecToggleSearchResults = ecFirstLazarus + 316;
ecViewAnchorEditor = ecFirstLazarus + 317;
ecViewTabOrderEditor = ecFirstLazarus + 318;
ecViewTabOrder = ecFirstLazarus + 318;
ecToggleCodeBrowser = ecFirstLazarus + 319;
ecToggleCompPalette = ecFirstLazarus + 320;
ecToggleIDESpeedBtns = ecFirstLazarus + 321;