From edff4059059cdc93a4ec542b60ba72e635241023 Mon Sep 17 00:00:00 2001
From: michl <michl@lazarus-ide.org>
Date: Thu, 12 Jul 2018 08:55:20 +0000
Subject: [PATCH] LCL: Win32: Groupbox disabled painted when parent is
 disabled.

git-svn-id: branches/fixes_1_8@58495 -
---
 lcl/interfaces/win32/win32wsstdctrls.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/interfaces/win32/win32wsstdctrls.pp b/lcl/interfaces/win32/win32wsstdctrls.pp
index 722826b6cc..281a555a95 100644
--- a/lcl/interfaces/win32/win32wsstdctrls.pp
+++ b/lcl/interfaces/win32/win32wsstdctrls.pp
@@ -538,7 +538,7 @@ begin
         begin
           Info := GetWin32WindowInfo(Window);
           if Assigned(Info) and (Info^.WinControl is TCustomGroupBox)
-          and not TCustomGroupBox(Info^.WinControl).Enabled then
+          and not Info^.WinControl.IsEnabled then
           begin
             GroupBox := TCustomGroupBox(Info^.WinControl);
             DC := Windows.GetDC(Window);