diff --git a/lcl/include/interfacebase.inc b/lcl/include/interfacebase.inc
index 9b317fd65b..94ad8b5d44 100644
--- a/lcl/include/interfacebase.inc
+++ b/lcl/include/interfacebase.inc
@@ -109,3 +109,8 @@ procedure TWidgetSet.DCSetAntialiasing(CanvasHandle: HDC; AEnabled: Boolean);
 begin
 end;
 
+procedure TWidgetSet.SetDesigning(AComponent: TComponent);
+begin
+
+end;
+
diff --git a/lcl/interfacebase.pp b/lcl/interfacebase.pp
index c97b52bce6..f282b7561b 100644
--- a/lcl/interfacebase.pp
+++ b/lcl/interfacebase.pp
@@ -168,7 +168,7 @@ type
     procedure DCSetPixel(CanvasHandle: HDC; X, Y: integer; AColor: TGraphicsColor); virtual; abstract;
     procedure DCRedraw(CanvasHandle: HDC); virtual; abstract;
     procedure DCSetAntialiasing(CanvasHandle: HDC; AEnabled: Boolean); virtual;
-    procedure SetDesigning(AComponent: TComponent); virtual; abstract;
+    procedure SetDesigning(AComponent: TComponent); virtual;
 
     function  InitStockFont(AFont: TObject; AStockFont: TStockFont): Boolean; virtual;
     function  IsHelpKey(Key: Word; Shift: TShiftState): Boolean; virtual;
diff --git a/lcl/interfaces/gtk2/gtk2int.pas b/lcl/interfaces/gtk2/gtk2int.pas
index f92e60f110..314225743e 100644
--- a/lcl/interfaces/gtk2/gtk2int.pas
+++ b/lcl/interfaces/gtk2/gtk2int.pas
@@ -255,7 +255,6 @@ type
     function  DCGetPixel(CanvasHandle: HDC; X, Y: integer): TGraphicsColor; override;
     procedure DCSetPixel(CanvasHandle: HDC; X, Y: integer; AColor: TGraphicsColor); override;
     procedure DCRedraw(CanvasHandle: HDC); override;
-    procedure SetDesigning(AComponent: TComponent); override;
     {used by 3rd party components eg. opengl implementation}
     procedure FinishCreateHandle(const AWinControl: TWinControl;
       Widget: PGtkWidget; const AParams: TCreateParams);
diff --git a/lcl/interfaces/gtk2/gtk2widgetset.inc b/lcl/interfaces/gtk2/gtk2widgetset.inc
index 0e79afc310..e25cf58a3a 100644
--- a/lcl/interfaces/gtk2/gtk2widgetset.inc
+++ b/lcl/interfaces/gtk2/gtk2widgetset.inc
@@ -5081,11 +5081,6 @@ begin
 end;
 
 
-procedure TGtk2WidgetSet.SetDesigning(AComponent: TComponent);
-begin
-  // ToDo: Implement
-end;
-
 {------------------------------------------------------------------------------
   Method: TGtk2WidgetSet.SetPixel
   Params:  Sender : the lcl object which called this func via SendMessage