From f762ac3dbd561efdfc6ce3cc85302e14eb7121be Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Tue, 31 Jan 2012 08:36:35 +0000
Subject: [PATCH] LCL: TCustomControlFilterEdit: keep still at designtime

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

diff --git a/lcl/editbtn.pas b/lcl/editbtn.pas
index 8ce520d39f..3d337764db 100644
--- a/lcl/editbtn.pas
+++ b/lcl/editbtn.pas
@@ -165,13 +165,13 @@ type
   // An abstract base class for edit controls which filter data in
   // visual controls like TListView and TTreeView.
   TCustomControlFilterEdit = class(TCustomEditButton)
-    procedure OnIdle(Sender: TObject; var Done: Boolean);
   private
     fFilter: string;
     fIdleConnected: Boolean;
     fSortData: Boolean;             // Data needs to be sorted.
     procedure SetFilter(const AValue: string);
     procedure SetIdleConnected(const AValue: Boolean);
+    procedure OnIdle(Sender: TObject; var Done: Boolean);
   protected
     fNeedUpdate: Boolean;
     fIsFirstUpdate: Boolean;
@@ -946,7 +946,7 @@ begin
     RestoreSelection;
   end
   else begin
-    if csDestroying in ComponentState then exit;
+    if [csDestroying,csDesigning]*ComponentState<>[] then exit;
     InvalidateFilter;
   end;
 end;