Same as for TExtForm: translate in TDBObjectEditor.OnCreate, not in all derived editor classed

source/apphelpers.pas

@@ -1880,6 +1880,7 @@ begin
   // Do not set alClient via DFM! In conjunction with ExplicitXXX properties that
   // repeatedly breaks the GUI layout when you reload the project
   Align := alClient;
+  TranslateComponent(Self);
 end;
 
 destructor TDBObjectEditor.Destroy;

source/event_editor.pas

@@ -77,7 +77,6 @@ uses main;
 constructor TfrmEventEditor.Create(AOwner: TComponent);
 begin
   inherited;
-  TranslateComponent(Self);
   Mainform.SynCompletionProposal.AddEditor(SynMemoBody);
   comboEveryInterval.Items := Explode('|', 'YEAR|QUARTER|MONTH|DAY|HOUR|MINUTE|WEEK|SECOND|YEAR_MONTH|'+
     'DAY_HOUR|DAY_MINUTE|DAY_SECOND|HOUR_MINUTE|HOUR_SECOND|MINUTE_SECOND');

source/routine_editor.pas

@@ -104,7 +104,6 @@ uses main, dbstructures, grideditlinks;
 constructor TfrmRoutineEditor.Create(AOwner: TComponent);
 begin
   inherited;
-  TranslateComponent(Self);
   // Combo items in a .dfm are sporadically lost after an IDE restart,
   // so we set them here to avoid developer annoyance
   comboType.Items.Add(_('Procedure (doesn''t return a result)'));

source/table_editor.pas

@@ -209,7 +209,6 @@ uses main;
 constructor TfrmTableEditor.Create(AOwner: TComponent);
 begin
   inherited;
-  TranslateComponent(Self);
   FixVT(listColumns);
   FixVT(treeIndexes);
   FixVT(listForeignKeys);

source/trigger_editor.pas

@@ -63,7 +63,6 @@ var
   i: Integer;
 begin
   inherited;
-  TranslateComponent(Self);
   SynMemoBody.Highlighter := Mainform.SynSQLSynUsed;
   editName.MaxLength := NAME_LEN;
   comboTiming.Items.Text := 'BEFORE'+CRLF+'AFTER';

source/view.pas

@@ -52,7 +52,6 @@ uses main;
 constructor TfrmView.Create(AOwner: TComponent);
 begin
   inherited;
-  TranslateComponent(Self);
   SynMemoBody.Highlighter := Mainform.SynSQLSynUsed;
   Mainform.SynCompletionProposal.AddEditor(SynMemoBody);
   editName.MaxLength := NAME_LEN;