From 026d2ee1e77e428e2920210e47bb98f94c750bef Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Sat, 9 Feb 2002 01:47:41 +0000
Subject: [PATCH] MG: fixed speedbutton in designmode

git-svn-id: trunk@1031 -
---
 lcl/include/control.inc | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lcl/include/control.inc b/lcl/include/control.inc
index e71665d706..2c2a8ede54 100644
--- a/lcl/include/control.inc
+++ b/lcl/include/control.inc
@@ -1165,7 +1165,7 @@ end;
 {------------------------------------------------------------------------------}
 procedure TControl.Repaint;
 var
- DC: HDC;
+  DC: HDC;
 begin
   if (Visible or (csDesigning in ComponentState)
   and not (csNoDesignVisible in ControlStyle))
@@ -1750,6 +1750,9 @@ end;
 
 { =============================================================================
   $Log$
+  Revision 1.66  2002/08/26 17:28:20  lazarus
+  MG: fixed speedbutton in designmode
+
   Revision 1.65  2002/08/24 13:41:29  lazarus
   MG: fixed TSpeedButton.SetDown and Invalidate