[Lazarus] Component palette reordering

[Sandro Cumerlato]

Attached patch solves CheckBox panting issue.

P.S.: CheckBox is not yet aligned correctly if corresponding row is
selected.

Sandro


On 19 November 2014 11:35, Juha Manninen <juha.manninen62 at gmail.com> wrote:

> On Wed, Nov 19, 2014 at 10:30 AM, Sandro Cumerlato
> <sandro.cumerlato at gmail.com> wrote:
> > Painting is not working properly under Windows. Look at the attachments.
>
> Pease try commenting out the code I added in r46885. For me it makes
> no difference but I don't see the redraw errors either.
> You can try other experiments around that code, too.
>
> There were serious redraw problems earlier but I thought I solved them
> by using AutoSize instead of SetBounds for CheckBox in r468850.
> See also issue:
>   http://bugs.freepascal.org/view.php?id=22347
>
> BTW, did you notice a slowdown after my component palette changes?
>
> Juha
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20141119/db9b57f2/attachment-0003.html>
-------------- next part --------------
Index: components/ideintf/objectinspector.pp
===================================================================
--- components/ideintf/objectinspector.pp	(revisione 46885)
+++ components/ideintf/objectinspector.pp	(copia locale)
@@ -2632,9 +2632,6 @@
         begin
           FCurrentEdit.Top := EditCompRect.Top;
           FCurrentEdit.Left := EditCompRect.Left;
-          // For testing: Try to prevent redraw errors in some Windows machines.
-          //Canvas.Brush.Color := FBackgroundColor;
-          //Canvas.FillRect(EditCompRect);
         end
         else
           FCurrentEdit.BoundsRect:=EditCompRect;
@@ -2673,9 +2670,6 @@
     begin
       if Assigned(FCurrentButton) and (FCurrentButton.Visible) then
         Dec(FullRect.Right, FCurrentButton.Width);
-
-      if Assigned(FCurrentEdit) and (FCurrentEdit.Visible) then
-        Dec(FullRect.Right, FCurrentEdit.Width);
     end;
   end;