From 1d1986b465d9569f39bc58f5b46dfb6c06a6a9ea Mon Sep 17 00:00:00 2001
From: michl <michl@lazarus-ide.org>
Date: Sun, 19 Aug 2018 09:27:46 +0000
Subject: [PATCH] LCL: Always create enabled controls in designer. Regression
 revision 58448 #9733fa84ab. Delphi compatible.

git-svn-id: trunk@58740 -
---
 lcl/include/wincontrol.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/include/wincontrol.inc b/lcl/include/wincontrol.inc
index 8ae2e56cbf..10f86f77a9 100644
--- a/lcl/include/wincontrol.inc
+++ b/lcl/include/wincontrol.inc
@@ -6095,7 +6095,7 @@ begin
     Params.ExStyle := Params.ExStyle or WS_EX_CLIENTEDGE;
   if TabStop then
     Params.Style := Params.Style or WS_TABSTOP;
-  if not IsEnabled then
+  if not IsEnabled and not (csDesigning in ComponentState) then
     Params.Style := Params.Style or WS_DISABLED;
 
   if (Parent <> nil) then