From cff852ae18e29eb44b0dccdc5693912c9a8899df Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 17 Aug 2002 23:41:20 +0000
Subject: [PATCH] fixed TDefaultComponentEditor

git-svn-id: trunk@2399 -
---
 designer/designer.pp | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/designer/designer.pp b/designer/designer.pp
index 1496827479..13007b0018 100644
--- a/designer/designer.pp
+++ b/designer/designer.pp
@@ -613,32 +613,22 @@ Begin
               if (ControlSelection.SelectionForm<>nil)
               and (ControlSelection.SelectionForm<>Form)
               then begin
-                MessageDlg('Invalid mutliselection',
+                MessageDlg('Invalid multiselection',
                   'Multiselected components must be of a single form.',
                   mtInformation,[mbOk],0);
               end else begin
                 ControlSelection.Add(MouseDownComponent);
-                //InvalidateWithParent(MouseDownComponent);
               end;
             end else begin
               // remove from multiselection
               ControlSelection.Delete(CompIndex);
-              //InvalidateWithParent(MouseDownComponent);
             end;
           end else begin
             // no shift key (single selection)
 
             if (CompIndex<0) then begin
               // select only this component
-
-              // invalidate old components
-              //for i:=0 to ControlSelection.Count-1 do
-              //  if ControlSelection[i].Component is TControl then
-              //    InvalidateWithParent(TControl(ControlSelection[i].Component));
-
-              // clear old selection and select new component
               ControlSelection.AssignComponent(MouseDownComponent);
-              //InvalidateWithParent(MouseDownComponent);
             end;
           end;
         end;