diff --git a/designer/taborderdlg.pas b/designer/taborderdlg.pas
index 1a2d772b23..9accc7382a 100644
--- a/designer/taborderdlg.pas
+++ b/designer/taborderdlg.pas
@@ -183,7 +183,7 @@ begin
       LookupRoot := GlobalDesignHook.LookupRoot;
       if Assigned(LookupRoot) and (LookupRoot is TWinControl) then begin
         CreateNodes(TWinControl(LookupRoot), nil);
-        Caption:=lisTabOrderOf + ' ' + TWinControl(LookupRoot).Name;
+        Caption:=Format(lisTabOrderOf, [TWinControl(LookupRoot).Name]);
       end;
     finally
       ItemTreeview.EndUpdate;
diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas
index a823794f99..e4ba0b6937 100644
--- a/ide/lazarusidestrconsts.pas
+++ b/ide/lazarusidestrconsts.pas
@@ -4402,7 +4402,7 @@ resourcestring
   lisPODoNotSaveAnySessionInfo = 'Do not save any session info';
   lisPOSaveSessionInformationIn = 'Save session information in';
   lisMVSaveMessagesToFileTxt = 'Save messages to file (*.txt)';
-  lisTabOrderOf = 'Tab Order of';
+  lisTabOrderOf = 'Tab Order of %s';
 
   lisAnchorEnabledHint = 'Enabled = Include %s in Anchors';
   lisAroundBorderSpaceHint = 'Borderspace around the control. The other four borderspaces are added to this value.';