From 22e9d7e9cd3e5b3d5a352c363485c41d7c025cc2 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 27 May 2011 20:28:39 +0000
Subject: [PATCH] LCL: TButtonPanel: hide buttons at designtime

git-svn-id: trunk@30940 -
---
 lcl/buttonpanel.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lcl/buttonpanel.pas b/lcl/buttonpanel.pas
index f57b1333da..a872bc0467 100644
--- a/lcl/buttonpanel.pas
+++ b/lcl/buttonpanel.pas
@@ -190,14 +190,14 @@ begin
 
     if btn in FShowButtons
     then begin
-      aButton.Visible := True;
       if csDesigning in ComponentState then
         aButton.ControlStyle:=aButton.ControlStyle-[csNoDesignVisible];
+      aButton.Visible := True;
     end
     else begin
-      aButton.Visible := False;
       if csDesigning in ComponentState then
         aButton.ControlStyle:=aButton.ControlStyle+[csNoDesignVisible];
+      aButton.Visible := False;
     end;
   end;