From d7d5afb621728d5969c36e3be233a85c930fbb21 Mon Sep 17 00:00:00 2001 From: paul Date: Wed, 23 Sep 2009 12:51:46 +0000 Subject: [PATCH] designer: cleanup git-svn-id: trunk@21839 - --- designer/designer.pp | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) diff --git a/designer/designer.pp b/designer/designer.pp index 267b3081fc..cbe1f037a1 100644 --- a/designer/designer.pp +++ b/designer/designer.pp @@ -1417,22 +1417,18 @@ begin LastPaintSender:=Sender; if IsDesignerDC(Form.Handle, TheMessage.DC) then - begin - DoPaintDesignerItems; - end + DoPaintDesignerItems else begin // client grid - if (Sender is TWinControl) - and (csAcceptsControls in Sender.ControlStyle) then begin + if (Sender is TWinControl) and (csAcceptsControls in Sender.ControlStyle) then PaintClientGrid(TWinControl(Sender),DDC); - end; if (WidgetSet.GetLCLCapability(lcCanDrawOutsideOnPaint) <> 0) and not EnvironmentOptions.DesignerPaintLazy then DoPaintDesignerItems; end; - + // clean up DDC.Clear; end;